diff options
| author | Jens-Heiner Rechtien <hr@openoffice.org> | 2007-07-31 12:10:47 +0000 |
|---|---|---|
| committer | Jens-Heiner Rechtien <hr@openoffice.org> | 2007-07-31 12:10:47 +0000 |
| commit | 7f5862fc6877c34236f4d121163fe37e66dbbd1d (patch) | |
| tree | 34cec57ce553ec638b9927dd516d4bfbb17e6075 /postprocess | |
| parent | 6f8ff2fa1c1bbc8fe7af188304d10a26bb4a1f41 (diff) | |
INTEGRATION: CWS configure21 (1.8.22); FILE MERGED
2007/07/01 20:31:59 rene 1.8.22.1: #i79060# quote.
Diffstat (limited to 'postprocess')
| -rw-r--r-- | postprocess/checkdeliver/checkdeliver.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/postprocess/checkdeliver/checkdeliver.pl b/postprocess/checkdeliver/checkdeliver.pl index 3e6bd61955d4..ed2a0eaee950 100644 --- a/postprocess/checkdeliver/checkdeliver.pl +++ b/postprocess/checkdeliver/checkdeliver.pl @@ -7,9 +7,9 @@ eval 'exec perl -wS $0 ${1+"$@"}' # # $RCSfile: checkdeliver.pl,v $ # -# $Revision: 1.8 $ +# $Revision: 1.9 $ # -# last change: $Author: vg $ $Date: 2006-11-01 10:13:33 $ +# last change: $Author: hr $ $Date: 2007-07-31 13:10:47 $ # # The Contents of this file are made available subject to # the terms of GNU Lesser General Public License Version 2.1. @@ -148,7 +148,7 @@ sub check my %delivered; my $module; my $islinked = 0; - if ( $listname =~ /\/(\w+?)\/deliver.log$/o ) { + if ( $listname =~ quotemeta(/\/(\w+?)\/deliver.log$/o) ) { $module = $1; } else { print STDERR "Error: cannot determine module name from \'$listname\'\n"; |