diff options
| author | David Phillips <david@sighup.nz> | 2018-06-20 17:49:19 +1200 |
|---|---|---|
| committer | David Phillips <david@sighup.nz> | 2018-06-20 17:49:19 +1200 |
| commit | 549ac4f97e0a70238006cc7b4d4ff752f281b930 (patch) | |
| tree | 2cd45d55ca4b8f4bc7d23e0dd142464065d4b882 /Plugin | |
| parent | 792eade6c29beb6cf9b1e31ddffdc6476ff21b01 (diff) | |
| download | idalius-549ac4f97e0a70238006cc7b4d4ff752f281b930.tar.xz | |
No need for [A-z] when case-insensitive flag used
Diffstat (limited to 'Plugin')
| -rw-r--r-- | Plugin/URL_Title.pm | 2 |
1 files changed, 1 insertions, 1 deletions
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; |