#!/bin/rc # This script will uninstall all scripts/dirs copied into $1 # It uses rmdir(1) to prevent removal of any files from elsewhere bin = $1 if (test -f .installed) { installed = `$nl{cat .installed} for (s in $installed) { echo RM $bin/$s rm $bin/$s removed = ($removed $bin/$s) } rm .installed } if (test -f .dirsmade) { dirsmade = `$nl{cat .dirsmade} for (d in $dirsmade) { echo RMDIR $bin/$d rmdir $bin/$d removed = ($removed $bin/$s) } rm .dirsmade } if (~ $removed ()) { echo nothing to remove }