+ sed '/start\-sanitize\-tx49/,/end-\sanitize\-tx49/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
+
+tic80_files="ChangeLog config.sub configure.in"
+
+if ( echo $* | grep keep\-tic80 > /dev/null ) ; then
+ for i in $tic80_files ; do
+ if test ! -d $i && (grep sanitize-tic80 $i > /dev/null) ; then
+ if [ -n "${verbose}" ] ; then
+ echo Keeping tic80 stuff in $i
+ fi
+ fi
+ done
+else
+ for i in * ; do
+ if test ! -d $i && (grep sanitize-tic80 $i > /dev/null) ; then
+ if [ -n "${verbose}" ] ; then
+ echo Removing traces of \"tic80\" from $i...
+ fi
+ cp $i new
+ sed '/start\-sanitize\-tic80/,/end-\sanitize\-tic80/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
+
+sky_files="ChangeLog config.sub configure.in"
+
+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 * ; 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
+
+if ( echo $* | grep keep\-ide > /dev/null ) ; then
+ for i in * ; do
+ if test ! -d $i && (grep sanitize-ide $i > /dev/null) ; then
+ if [ -n "${verbose}" ] ; then
+ echo Keeping ide stuff in $i
+ fi
+ fi
+ done
+else
+ for i in * ; do
+ if test ! -d $i && (grep sanitize-ide $i > /dev/null) ; then
+ if [ -n "${verbose}" ] ; then
+ echo Removing traces of \"ide\" from $i...
+ fi
+ cp $i new
+ sed '/start\-sanitize\-ide/,/end-\sanitize\-ide/d' < $i > new