![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to commit_prep.pl CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / CVSROOT|
Return to commit_prep.pl CVS log | Up to [local] / CVSROOT |
| version 1.1, 1999/10/27 17:45:04 | version 1.2, 1999/10/27 18:03:00 | ||
|---|---|---|---|
|
|
||
| $directory = $ARGV[0]; | $directory = $ARGV[0]; | ||
| shift @ARGV; | shift @ARGV; | ||
| $cvsroot=$ENV{'CVSROOT'} || "/home/ncvs"; | $cvsroot=$ENV{'CVSROOT'} || "/usr/cvs"; | ||
| $directory =~ s,^$cvsroot[/]+,,; | $directory =~ s,^$cvsroot[/]+,,; | ||
| if ($directory =~ /^OpenXM/) { | if ($directory =~ /^OpenXM/) { |