add parens around scheme regexp
authorJoey Hess <joey@kodama.kitenet.net>
Sun, 10 Feb 2008 21:29:46 +0000 (16:29 -0500)
committerJoey Hess <joey@kodama.kitenet.net>
Sun, 10 Feb 2008 21:29:46 +0000 (16:29 -0500)
IkiWiki/Plugin/htmlscrubber.pm

index e02a8591ef2eac17d9d34eba4031bcdb7ce6b3ab..897a398bae7cfe1d87b1b1b618857a407afa10f7 100644 (file)
@@ -37,7 +37,7 @@ sub scrubber { #{{{
        );
        # data is a special case. Allow data:image/*, but
        # disallow data:text/javascript and everything else.
-       my $link=qr/^(?:$uri_schemes:|data:image\/|[^:]+$)/i;
+       my $link=qr/^(?:(?:$uri_schemes):|data:image\/|[^:]+$)/i;
 
        eval q{use HTML::Scrubber};
        error($@) if $@;