r13937 - /scripts/qa/DebianQA/Svn.pm
tincho-guest at users.alioth.debian.org
tincho-guest at users.alioth.debian.org
Fri Feb 1 05:50:30 UTC 2008
Author: tincho-guest
Date: Fri Feb 1 05:50:29 2008
New Revision: 13937
URL: http://svn.debian.org/wsvn/?sc=1&rev=13937
Log:
Correctly trim whitespace in watch files
Modified:
scripts/qa/DebianQA/Svn.pm
Modified: scripts/qa/DebianQA/Svn.pm
URL: http://svn.debian.org/wsvn/scripts/qa/DebianQA/Svn.pm?rev=13937&op=diff
==============================================================================
--- scripts/qa/DebianQA/Svn.pm (original)
+++ scripts/qa/DebianQA/Svn.pm Fri Feb 1 05:50:29 2008
@@ -334,7 +334,9 @@
$version =~ s/^(?:\d+:)?(.+?)(?:-[^-]+)?$/$1/;
$watch =~ s/^#.*$//gm;
- $watch =~ s/\\\n//gs;
+ $watch =~ s/\s*\\\n\s*/ /gs;
+ $watch =~ s/^\s+//gm;
+ $watch =~ s/\s+$//gm;
my @watch_lines = split(/\n/, $watch);
@watch_lines = grep((!/^version\s*=/ and !/^\s*$/),
@watch_lines);
More information about the Pkg-perl-cvs-commits
mailing list