PATCH: A few validate_repo.pl enhancements

[Torsten Martinsen]

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