diff options
Diffstat (limited to 'contrib')
| -rw-r--r-- | contrib/ChangeLog | 4 | ||||
| -rw-r--r-- | contrib/make_sunver.pl | 3 |
2 files changed, 6 insertions, 1 deletions
diff --git a/contrib/ChangeLog b/contrib/ChangeLog index b382897..abe317a 100644 --- a/contrib/ChangeLog +++ b/contrib/ChangeLog @@ -1,3 +1,7 @@ +2011-11-21 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE> + + * make_sunver.pl: Convert '?' in glob patterns to '.'. + 2011-11-07 Richard Henderson <rth@redhat.com> Merged from transactional-memory. diff --git a/contrib/make_sunver.pl b/contrib/make_sunver.pl index 2928374..96ad22c 100644 --- a/contrib/make_sunver.pl +++ b/contrib/make_sunver.pl @@ -276,9 +276,10 @@ while (<F>) { if (/^([ \t]*)([^ \t;{}#]+);?[ \t]*$/) { my $ws = $1; my $ptn = $2; - # Turn the glob into a regex by replacing '*' with '.*'. + # Turn the glob into a regex by replacing '*' with '.*', '?' with '.'. # Keep $ptn so we can still print the original form. ($pattern = $ptn) =~ s/\*/\.\*/g; + $pattern =~ s/\?/\./g; if ($glob eq 'ign') { # We're in a local: * section; just continue. |