|
|
|
@ -27,6 +27,12 @@ else |
|
|
|
keep_these_too="${keep_these_too} mh-windows" |
|
|
|
fi |
|
|
|
|
|
|
|
if ( echo $* | grep keep\-sky > /dev/null ) ; then |
|
|
|
keep_these_too="${keep_these_too} mt-sky" |
|
|
|
else |
|
|
|
lose_these_too="${lose_these_too} mt-sky" |
|
|
|
fi |
|
|
|
|
|
|
|
# All files listed between the "Things-to-keep:" line and the |
|
|
|
# "Do-last:" line will be kept. All other files will be removed. |
|
|
|
# Directories listed in this section will have their own Sanitize |
|
|
|
@ -123,6 +129,34 @@ else |
|
|
|
done |
|
|
|
fi |
|
|
|
|
|
|
|
sky_files="ChangeLog" |
|
|
|
if ( echo $* | grep keep\-sky > /dev/null ) ; then |
|
|
|
for i in $sky_files ; do |
|
|
|
if test ! -d $i && (grep sanitize-sky $i > /dev/null) ; then |
|
|
|
if [ -n "${verbose}" ] ; then |
|
|
|
echo Keeping sky stuff in $i |
|
|
|
fi |
|
|
|
fi |
|
|
|
done |
|
|
|
else |
|
|
|
for i in $sky_files ; do |
|
|
|
if test ! -d $i && (grep sanitize-sky $i > /dev/null) ; then |
|
|
|
if [ -n "${verbose}" ] ; then |
|
|
|
echo Removing traces of \"sky\" from $i... |
|
|
|
fi |
|
|
|
cp $i new |
|
|
|
sed '/start\-sanitize\-sky/,/end-\sanitize\-sky/d' < $i > new |
|
|
|
if [ -n "${safe}" -a ! -f .Recover/$i ] ; then |
|
|
|
if [ -n "${verbose}" ] ; then |
|
|
|
echo Caching $i in .Recover... |
|
|
|
fi |
|
|
|
mv $i .Recover |
|
|
|
fi |
|
|
|
mv new $i |
|
|
|
fi |
|
|
|
done |
|
|
|
fi |
|
|
|
|
|
|
|
cygnus_files="mh-go32" |
|
|
|
if ( echo $* | grep keep\-cygnus > /dev/null ) ; then |
|
|
|
for i in $cygnus_files ; do |
|
|
|
|
Doug Evans
28 years ago