urlcopy: More improvements to the pattern matching code. Please repor…

…t any regressions (missed URLs) from this change.

urlcopy.lua

@@ -19,21 +19,22 @@ BCM.modules[#BCM.modules+1] = function()
 	-- As of the introduction of the S.E.L.F.I.E camera we now require at least 2 valid letters e.g. yo.hi
 	local filterFunc = function(_, _, msg, ...)
 		local newMsg, found = gsub(msg,
-			" [^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d]*%.?[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d]+[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d]%.[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d][^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d]+/[^ \"%^`{}%[%]\\|<>]+",
-			"|cffffffff|Hbcmurl~%1|h[%1]|h|r"
+			"( )([^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d]*%.?[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d]+[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d]%.[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d][^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d]+/[^ \"%^`{}%[%]\\|<>]+)",
+			"%1|cffffffff|Hbcmurl~%2|h[%2]|h|r"
 		)
+		if found > 0 then return false, newMsg, ... end
 		newMsg, found = gsub(msg,
-			"^[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d]*%.?[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d]+[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d]%.[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d][^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d]+/[^ \"%^`{}%[%]\\|<>]+",
+			"^[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d]*%.?[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d]+[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d]%.[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d][^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d]+/[^ \"%^`{}%[%]\\|<>]+",
 			"|cffffffff|Hbcmurl~%1|h[%1]|h|r"
 		)
 		if found > 0 then return false, newMsg, ... end
 		newMsg, found = gsub(msg,
-			" [^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d]*%.?[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d]+[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d]%.[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d][^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d]+",
-			"|cffffffff|Hbcmurl~%1|h[%1]|h|r"
+			"( )([^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d]*%.?[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d]+[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d]%.[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d][^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d]+)",
+			"%1|cffffffff|Hbcmurl~%2|h[%2]|h|r"
 		)
 		if found > 0 then return false, newMsg, ... end
 		newMsg, found = gsub(msg,
-			"^[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d]*%.?[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d]+[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d]%.[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d][^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%d]+",
+			"^[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d]*%.?[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d]+[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d]%.[^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d][^ %%'%-=%./,\"%^`{}%[%]\\|<>%(%)%*~%d]+",
 			"|cffffffff|Hbcmurl~%1|h[%1]|h|r"
 		)
 		if found > 0 then return false, newMsg, ... end
@@ -48,8 +49,8 @@ BCM.modules[#BCM.modules+1] = function()
 		newMsg, found = gsub(msg,
 			-- This is our mid-sentence IPv4/v6 pattern, we separate the IP patterns into 2 to prevent
 			-- false positives with linking items, spells, etc.
-			" %x+[%.:]%x+[%.:]%x+[%.:]%x+[^ \"%^`{}%[%]\\|<>]*",
-			"|cffffffff|Hbcmurl~%1|h[%1]|h|r"
+			"( )(%x+[%.:]%x+[%.:]%x+[%.:]%x+[^ \"%^`{}%[%]\\|<>]*)",
+			"%1|cffffffff|Hbcmurl~%2|h[%2]|h|r"
 		)
 		if found > 0 then return false, newMsg, ... end
 	end