Support tx19 sanitation.

1 files changed, 29 insertions, 0 deletions

diff --git a/.Sanitize b/.Sanitize
index 15033a1..5a27b37 100644
--- a/.Sanitize
+++ b/.Sanitize
@@ -361,6 +361,35 @@ else
 	done
 fi
 
+tx19_files="ChangeLog config.sub"
+
+if ( echo $* | grep keep\-tx19 > /dev/null ) ; then
+	for i in $tx19_files ; do
+		if test ! -d $i && (grep sanitize-tx19 $i > /dev/null) ; then
+			if [ -n "${verbose}" ] ; then
+				echo Keeping tx19 stuff in $i
+			fi
+		fi
+	done
+else
+	for i in * ; do
+		if test ! -d $i && (grep sanitize-tx19 $i > /dev/null) ; then
+			if [ -n "${verbose}" ] ; then
+				echo Removing traces of \"tx19\" from $i...
+			fi
+			cp $i new
+			sed '/start\-sanitize\-tx19/,/end-\sanitize\-tx19/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