Author: adsb
Date: 2008-11-26 16:28:31 +0000 (Wed, 26 Nov 2008)
New Revision: 1745
Modified:
trunk/debian/changelog
trunk/scripts/checkbashisms.pl
Log:
checkbashisms: Fix a variable redeclaration warning. Thanks,
Neutron Soutmun. (Closes: #506975)
Modified: trunk/debian/changelog
===================================================================
--- trunk/debian/changelog 2008-11-24 19:51:47 UTC (rev 1744)
+++ trunk/debian/changelog 2008-11-26 16:28:31 UTC (rev 1745)
@@ -1,6 +1,8 @@
devscripts (2.10.42) UNRELEASED; urgency=low
[ Adam D. Barratt ]
+ * checkbashisms: Fix a variable redeclaration warning. Thanks,
+ Neutron Soutmun. (Closes: #506975)
* debi: Add an "upgrade" option indicating that only those packages
already installed on the system should be installed, rather than
all packages listed in the .changes file. Thanks, Colin Watson.
Modified: trunk/scripts/checkbashisms.pl
===================================================================
--- trunk/scripts/checkbashisms.pl 2008-11-24 19:51:47 UTC (rev 1744)
+++ trunk/scripts/checkbashisms.pl 2008-11-26 16:28:31 UTC (rev 1745)
@@ -334,7 +334,7 @@
# heredoc test itself will weed out any false positives
$cat_line =~ s/(^|[^<\\\"-](?:\\\\)*)\'(?:\\.|[^\\\'])+\'/$1''/g;
- my $re='(?<![\$\\\])\$\"[^\"]+\"';
+ $re='(?<![\$\\\])\$\"[^\"]+\"';
if ($line =~ m/(.*)($re)/){
my $count = () = $1 =~ /(^|[^\\])\"/g;
if( $count % 2 == 0 ) {
--
To unsubscribe, send mail to [EMAIL PROTECTED]
