Initial commit of additional CVS management utilities for use with CVS file copies
git-svn-id: svn://10.0.0.236/trunk@235455 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
parent
03b9c3dd76
commit
dc133ae3f7
8
mozilla/tools/cvsmgmt/bulk-copy.pl
Executable file
8
mozilla/tools/cvsmgmt/bulk-copy.pl
Executable file
@ -0,0 +1,8 @@
|
||||
#!/usr/bin/perl
|
||||
|
||||
while (my $line = <STDIN>) {
|
||||
if ($line =~ /^(\S+)\s(\S+)$/) {
|
||||
print "Copying $1 -> $2 ...\n";
|
||||
system("/opt/cvsmgmt/copy-cvs-file.pl -d $1,v $2,v");
|
||||
}
|
||||
}
|
||||
7
mozilla/tools/cvsmgmt/verify-bulk-copy.pl
Executable file
7
mozilla/tools/cvsmgmt/verify-bulk-copy.pl
Executable file
@ -0,0 +1,7 @@
|
||||
#!/usr/bin/perl
|
||||
|
||||
while (my $line = <STDIN>) {
|
||||
if ($line =~ /^(\S+)\s(\S+)$/) {
|
||||
system("/opt/cvsmgmt/copy-cvs-file.pl -n $1,v $2,v");
|
||||
}
|
||||
}
|
||||
Loading…
x
Reference in New Issue
Block a user