view move-if-change @ 59103:9c9d41548660

(cperl-find-bad-style): Use with-no-warnings. (cperl-font-lock-unfontify-region-function): No need to save and restore info, since font-lock.el does it for us.
author Richard M. Stallman <rms@gnu.org>
date Mon, 27 Dec 2004 15:39:42 +0000
parents 354e0c45cedf
children 14a97ab281d5
line wrap: on
line source

#!/bin/sh
if
test -r $2
then
if
cmp $1 $2 > /dev/null
then
echo $2 is unchanged
rm -f $1
else
mv -f $1 $2
fi
else
mv -f $1 $2
fi