diff options
Diffstat (limited to 'bin/21add')
-rwxr-xr-x | bin/21add | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/bin/21add b/bin/21add deleted file mode 100755 index e7a77da34..000000000 --- a/bin/21add +++ /dev/null @@ -1,20 +0,0 @@ -#!/usr/bin/perl - -use Cwd; -use String::ShellQuote; - -my $USER = $ENV{USER}; - -my $dir = getcwd; -( my $prefix = $dir ) =~ s(^/home/$USER/freeside/?)() or die $dir; #eventually from anywhere - -system join('', - #"cvs add @ARGV && ", - "cvs add @ARGV ; ", - "( for file in @ARGV; do ", - "cp -i \$file /home/$USER/freeside2.1/$prefix/`dirname \$file`;", - "done ) && ", - "cd /home/$USER/freeside2.1/$prefix/ && ", - "cvs add @ARGV" -); - |