--- rxvt-unicode/src/perl/matcher	2012/06/10 17:31:53	1.10
+++ rxvt-unicode/src/perl/matcher	2012/09/04 22:41:11	1.13
@@ -11,9 +11,9 @@
 
 =head1 NAME
 
-  matcher - match strings in terminal output and change their rendition
+matcher - match strings in terminal output and change their rendition
 
-=head1 DESCRPTION
+=head1 DESCRIPTION
 
 Uses per-line display filtering (C<on_line_update>) to underline text
 matching a certain pattern and make it clickable. When clicked with the
@@ -49,10 +49,10 @@
 my $url =
    qr{
       (?:https?://|ftp://|news://|mailto:|file://|\bwww\.)
-      [a-zA-Z0-9\-\@;\/?:&=%\$_.+!*\x27,~#]*
+      [\w\-\@;\/?:&=%\$.+!*\x27,~#]*
       (
-         \([a-zA-Z0-9\-\@;\/?:&=%\$_.+!*\x27,~#]*\)| # Allow a pair of matched parentheses
-         [a-zA-Z0-9\-\@;\/?:&=%\$_+*~]  # exclude some trailing characters (heuristic)
+         \([\w\-\@;\/?:&=%\$.+!*\x27,~#]*\)| # Allow a pair of matched parentheses
+         [\w\-\@;\/?:&=%\$+*~]  # exclude some trailing characters (heuristic)
       )+
    }x;