This patch fixes two minor problems in the validate_repo.pl script:
 
1) User names containing spaces could not be parsed. (Such user names
are relatively common in Windows environments).
 
2) Perl complains about an unitialized variable being used, which caused
me to get a lot of annoying cron mail :-)

 
diff -u validate_repo.in~ validate_repo.in
--- validate_repo.in~ Fri Mar 11 08:47:37 2005
+++ validate_repo.in Fri Mar 11 08:49:11 2005
@@ -496,7 +496,7 @@
   if( $ignore == 2 )
   {
       if( my ( $date, $author, $state ) =
-               $line =~ /^date: (\S+ \S+);  author: (\S+);  state:
(\S+);/ )
+               $line =~ /^date: (\S+ \S+);  author: ([\S\s]+);  state:
(\S+);/ )
    {
     $rinfo{$revision} =
     {
@@ -700,7 +700,7 @@
     || $max_branch_revision{$branch_number} < $branch_rev );
  }
 
-       push( @new_revisions, "1.1" ) unless $max_branch_revision{1} ==
1;
+       push( @new_revisions, "1.1" ) unless (exists
$max_branch_revision{1} && ($max_branch_revision{1} == 1));
     while( ( $key, $value ) = each ( %max_branch_revision ) )
     {
         push( @new_revisions, $key . "." . $value );
 
 
 
-Torsten


_______________________________________________
Bug-cvs mailing list
Bug-cvs@gnu.org
http://lists.gnu.org/mailman/listinfo/bug-cvs

Reply via email to