r6711 - /scripts/qa/versioncheck2.pl
tincho-guest at users.alioth.debian.org
tincho-guest at users.alioth.debian.org
Thu Aug 16 07:19:05 UTC 2007
Author: tincho-guest
Date: Thu Aug 16 07:19:05 2007
New Revision: 6711
URL: http://svn.debian.org/wsvn/?sc=1&rev=6711
Log:
Fixed the re-checking of the last revision. Added a couple of debug messages.
Modified:
scripts/qa/versioncheck2.pl
Modified: scripts/qa/versioncheck2.pl
URL: http://svn.debian.org/wsvn/scripts/qa/versioncheck2.pl?rev=6711&op=diff
==============================================================================
--- scripts/qa/versioncheck2.pl (original)
+++ scripts/qa/versioncheck2.pl Thu Aug 16 07:19:05 2007
@@ -717,7 +717,10 @@
%maindata = %md;
}
$svn->log( ["$SVN_REPO/trunk"], $maindata{"//lastrev"}, "HEAD", 1, 1, sub {
+ return if($_[1] <= $maindata{"//lastrev"});
+ debugmsg("Scanning changes from revision $_[1]:\n");
foreach(keys %{$_[0]}) {
+ debugmsg("- $_\n");
if(m{^/?trunk/([^/]+)/debian/(changelog|watch)$}) {
if($2 eq "changelog") {
push @cmodified, $1;
More information about the Pkg-perl-cvs-commits
mailing list