From 549ac4f97e0a70238006cc7b4d4ff752f281b930 Mon Sep 17 00:00:00 2001
From: David Phillips <david@sighup.nz>
Date: Wed, 20 Jun 2018 17:49:19 +1200
Subject: No need for [A-z] when case-insensitive flag used

---
 Plugin/URL_Title.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Plugin')

diff --git a/Plugin/URL_Title.pm b/Plugin/URL_Title.pm
index a2c8930..73fa498 100644
--- a/Plugin/URL_Title.pm
+++ b/Plugin/URL_Title.pm
@@ -37,7 +37,7 @@ sub message
 	return if ($config{url_on} == 0);
 
 	# Drawn from RFC 3986ยง2
-	if ($what =~ /(https?:\/\/[A-z0-9\-\._~:\/\?#\[\]@\!\$&'()\*\+,;=]+)/i) {
+	if ($what =~ /(https?:\/\/[a-z0-9\-\._~:\/\?#\[\]@\!\$&'()\*\+,;=]+)/i) {
 		$url = $1;
 	}
 	return unless $url;
-- 
cgit v1.1