X-Git-Url: http://www.privoxy.org/gitweb/?a=blobdiff_plain;f=tools%2Furl-pattern-translator.pl;h=ae745cf2621aff7651244f99c05d494a0b2fc3d8;hb=ed5b8d7f74bc21dc4c88c35b58e9657f0a611af2;hp=9dfa78f2ce2a91ec00d19422d3c62379e6ad550f;hpb=96a70945adcf3e57b9b9475f8e6da48d5d325d6f;p=privoxy.git diff --git a/tools/url-pattern-translator.pl b/tools/url-pattern-translator.pl index 9dfa78f2..ae745cf2 100755 --- a/tools/url-pattern-translator.pl +++ b/tools/url-pattern-translator.pl @@ -18,7 +18,7 @@ # Only convert your files once, or, as RoboCop used to say, # there will be... trouble. # -# $Id: url-pattern-translator.pl 1.10 2008/08/10 16:32:59 fk Exp $ +# $Id: url-pattern-translator.pl,v 1.3 2009/01/13 17:01:04 fabiankeil Exp $ # # Copyright (c) 2008 Fabian Keil # @@ -63,7 +63,7 @@ sub convert_host_pattern ($) { } # Match-all syntax has changed ... - $hp =~ s@\*@.*@g; + $hp =~ s@\*@[^.]*@g; # Extended host patterns are right-anchored by default $hp =~ s@\.$@(\..*)?@; @@ -101,9 +101,13 @@ sub looks_interesting($) { $type_to_skip = "macro or version definition"; + } elsif (m@^\s*standard\.@) { + + $type_to_skip = "predefined settings"; + } - #p("Skipping " . $type_to_skip . ": " . $_); + #p("Skipping " . $type_to_skip . ": " . $_) if defined $type_to_skip; return not defined $type_to_skip; }