Universal text object for quotes

1 files changed, 4 insertions, 1 deletions

diff --git a/pairs.lua b/pairs.lua
index 16315e2..11c5755 100644
--- a/pairs.lua
+++ b/pairs.lua
@@ -189,8 +189,11 @@ vis.events.subscribe(vis.events.INIT, function()
 	}
 
 	local tag = {"<" * l.Cg(l.C((l.S"_:" + l.R("az", "AZ")) * (l.R("az", "AZ", "09") + l.S"_:.-")^0), "t") * (1 - l.S"><")^0 * (">" - l.B"/"), l.Cmt("</" * l.Cb("t") * l.C((1 - l.P">")^1) * ">", function(_, _, c1, c2) return c1 == c2 end)}
-	local any_bracket = {l.Cg(l.C(l.S"([{"), "s"), l.Cmt(l.Cb("s") * l.C(1), function(_, _, c1, c2) return builtin_textobjects[c1][2] == c2 end)}
+	local function any_pair(set) return {l.Cg(l.C(l.S(set)), "s"), l.Cmt(l.Cb("s") * l.C(1), function(_, _, c1, c2) return builtin_textobjects[c1][2] == c2 end)} end
+	local any_quote = any_pair("'`\"")
+	local any_bracket = any_pair("({[")
 	local presets = {
+		{q = any_quote},
 		html = {t = tag},
 		xml = {t = tag},
 		scheme = {b = any_bracket},