Keep/lose arc stuff.

diff --git a/.Sanitize b/.Sanitize
index 2f1197c964e67c38e1688ae55f50fe371bee8edf..d0626e0d16650f694b655ab8b7b8395e662d72c0 100644 (file)
--- a/.Sanitize
+++ b/.Sanitize
@@ -204,6 +204,39 @@ else
        done
 fi
 
+if [ -n "${verbose}" ] ; then
+       echo Processing \"arc\"...
+fi
+
+# Don't try to clean directories here, as the 'mv' command will fail.
+# Also, grep fails on NFS mounted directories.
+if ( echo $* | grep keep\-arc > /dev/null ) ; then
+       for i in * ; do
+               if test ! -d $i && (grep sanitize-arc $i > /dev/null) ; then
+                       if [ -n "${verbose}" ] ; then
+                               echo Keeping arc stuff in $i
+                       fi
+               fi
+       done
+else
+       for i in * ; do
+               if test ! -d $i && (grep sanitize-arc $i > /dev/null) ; then
+                       if [ -n "${verbose}" ] ; then
+                               echo Removing traces of \"arc\" from $i...
+                       fi
+                       cp $i new
+                       sed '/start\-sanitize\-arc/,/end-\sanitize\-arc/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
+
 for i in * ; do
        if test ! -d $i && (grep sanitize $i > /dev/null) ; then
                echo '***' Some mentions of Sanitize are still left in $i! 1>&2