view move-if-change @ 43943:5ef08437e801

(cperl-imenu--function-name-regexp-perl): Move definition above cperl-outline-regexp.
author Richard M. Stallman <rms@gnu.org>
date Sat, 16 Mar 2002 06:52:31 +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