From: Kevin M. Rosenberg Date: Sun, 26 May 2002 23:24:34 +0000 (+0000) Subject: r2075: *** empty log message *** X-Git-Tag: debian-4.5.3-3~252 X-Git-Url: http://git.kpe.io/?p=ctsim.git;a=commitdiff_plain;h=8c852f9dd40d54ee3d4ac23e103ab5de120a98f3 r2075: *** empty log message *** --- diff --git a/batch-update b/batch-update deleted file mode 100755 index 3e9d4f8..0000000 --- a/batch-update +++ /dev/null @@ -1,26 +0,0 @@ -#!/usr/bin/perl - -foreach $file (@ARGV) -{ - open(IN,$file) || die "Can not open $file"; - open(OUT,"> /tmp/upd.$$") || die "Can not open /tmp/upd.$$"; - while () { - if (/Copyright \(C\) 1983-2000 Kevin Rosenberg/) { - print OUT '** Copyright (C) 1983-2000 Kevin Rosenberg -** -** $Id: batch-update,v 1.1 2000/04/28 13:02:43 kevin Exp $ -** $Log: batch-update,v $ -** Revision 1.1 2000/04/28 13:02:43 kevin -** Initial revision -** -'; - } else { - print OUT $_; - } - } - close(IN); - close(OUT); - unlink($file); - `mv /tmp/upd.$$ $file`; -} -