[BACK]Return to commit_prep.pl CVS log [TXT][DIR] Up to [local] / CVSROOT

Diff for /CVSROOT/commit_prep.pl between version 1.2 and 1.4

version 1.2, 1999/10/27 18:03:00 version 1.4, 2000/10/28 16:35:49
Line 1 
Line 1 
 #!/usr/bin/perl -w  #!/usr/bin/perl -w
 #  #
 # $OpenXM$  # $OpenXM: CVSROOT/commit_prep.pl,v 1.3 1999/10/30 16:01:35 maekawa Exp $
 #  #
 # Most parts obtained from FreeBSD.org and modified for OpenXM  # Most parts obtained from FreeBSD.org and modified for OpenXM
 #  #
Line 82  sub check_version {
Line 82  sub check_version {
   
     if ($pos == -1) {      if ($pos == -1) {
         printf($NoId, $filename);          printf($NoId, $filename);
         return(1);          return(0);
     }      }
     $bareid = (index($line, "\$\OpenXM: \$") >= 0 ||      $bareid = (index($line, "\$\OpenXM: \$") >= 0 ||
                 index($line, "\$\OpenXM\$") >= 0);                  index($line, "\$\OpenXM\$") >= 0);
Line 160  if ($check_id != 0) {
Line 160  if ($check_id != 0) {
     foreach $arg (@ARGV) {      foreach $arg (@ARGV) {
         local($hastag) = ($cvstag{$arg} ne '');          local($hastag) = ($cvstag{$arg} ne '');
         next if (index($arg, ".") == 0);          next if (index($arg, ".") == 0);
           next if (index($arg, "pkg-") == 0);
         $failed += &check_version($arg, $directory, $hastag, $cvsversion);          $failed += &check_version($arg, $directory, $hastag, $cvsversion);
     }      }
     if ($failed) {      if ($failed) {

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.4

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>