This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
mv-if-diff
authorRobin Barker <RMBarker@cpan.org>
Fri, 27 Mar 1998 18:06:11 +0000 (18:06 +0000)
committerMalcolm Beattie <mbeattie@sable.ox.ac.uk>
Thu, 2 Apr 1998 16:07:44 +0000 (16:07 +0000)
p4raw-id: //depot/perl@856

mv-if-diff

index 1112a10..ada6040 100644 (file)
@@ -8,7 +8,7 @@ if test $# -lt 2 ; then
 fi
 if cmp $1 $2 >/dev/null 2>&1; then
        echo "File $2 not changed."
-       rm -f tmp
+       rm -f $1
 else
        mv $1 $2
 fi