r5899 - /scripts/qa/versioncheck-html
dmn at users.alioth.debian.org
dmn at users.alioth.debian.org
Thu Jul 19 14:54:55 UTC 2007
Author: dmn
Date: Thu Jul 19 14:54:55 2007
New Revision: 5899
URL: http://svn.debian.org/wsvn/?sc=1&rev=5899
Log:
When looking in the big module list, require space around the REGEX, since otherwise we match too much - modules, whose names contain the name we look for
Modified:
scripts/qa/versioncheck-html
Modified: scripts/qa/versioncheck-html
URL: http://svn.debian.org/wsvn/scripts/qa/versioncheck-html?rev=5899&op=diff
==============================================================================
--- scripts/qa/versioncheck-html (original)
+++ scripts/qa/versioncheck-html Thu Jul 19 14:54:55 2007
@@ -73,7 +73,7 @@
if egrep -qi '^(ftp|http).+cpan' $DIR/watch; then
VER_REGEX=$(egrep '^http|^ftp' $DIR/watch | perl -pe 's{.+/\s*}{}; s/\s.*$//')
if [ -n "$VER_REGEX" ]; then
- UPNEW=$(perl -ne "if(/${VER_REGEX}/){ \$last_ver = \$1 if \$1 > \$last_ver; } END { print \$last_ver } " $DIR/cpan)
+ UPNEW=$(perl -ne "if(/\\s${VER_REGEX}\\s/){ \$last_ver = \$1 if \$1 > \$last_ver; } END { print \$last_ver } " $DIR/cpan)
else
UPNEW="Invalid debian/watch"
fi
More information about the Pkg-perl-cvs-commits
mailing list