view move-if-change @ 45546:ce01a38706ee

(Fcall_interactively) <"D">: Supply Qfile_directory_p predicate for Fread_file_name when reading directory name. Supply Qnil for predicate in other calls to Fread_file_name.

#!/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