Author: adsb
Date: 2009-01-02 18:28:59 +0000 (Fri, 02 Jan 2009)
New Revision: 1774
Modified:
trunk/scripts/checkbashisms.pl
Log:
(Very) Slightly simplify comment removal
Modified: trunk/scripts/checkbashisms.pl
===================================================================
--- trunk/scripts/checkbashisms.pl 2009-01-02 18:20:50 UTC (rev 1773)
+++ trunk/scripts/checkbashisms.pl 2009-01-02 18:28:59 UTC (rev 1774)
@@ -164,7 +164,7 @@
# back in for processing.
if (m/(?:^|[^[\\])[\s\&;\(\)](\#.*$)/) {
$_ = $orig_line;
- $_ =~ s/\Q$1\E//; # eat comments
+ s/\Q$1\E//; # eat comments
} else {
$_ = $orig_line;
}
--
To unsubscribe, send mail to [email protected].
