[MKDoc-commit] Patch from Sam to fix links with the SERVER_NAME in the query string

[chris at mkdoc.demon.co.uk]

Log Message:
-----------
Patch from Sam to fix links with the SERVER_NAME in the query string

Tags:
----
mkdoc-1-6

Modified Files:
--------------
    mkd/MKDoc/Util:
        LinkParser.pm

-------------- next part --------------
Index: LinkParser.pm
===================================================================
RCS file: /var/spool/cvs/mkd/MKDoc/Util/Attic/LinkParser.pm,v
retrieving revision 1.1.2.6
retrieving revision 1.1.2.7
diff -LMKDoc/Util/LinkParser.pm -LMKDoc/Util/LinkParser.pm -u -r1.1.2.6 -r1.1.2.7
--- MKDoc/Util/LinkParser.pm
+++ MKDoc/Util/LinkParser.pm
@@ -160,7 +160,7 @@
 
     # compile a regex from the internal prefixes
     my $re = join('|', map { qr/\Q$_\E/ } @prefixes);
-    $self->{internal_re} = qr/^$re/;
+    $self->{internal_re} = qr!^(?:$re)!;
 
     return $self;
 }