head	1.1;
access;
symbols;
locks; strict;
comment	@# @;


1.1
date	94.03.02.15.20.54;	author ids;	state Exp;
branches;
next	;


desc
@@


1.1
log
@Initial revision
@
text
@#!/bin/csh -f
#
# macclean: verify interactively that the Mac Unix clutter of directories is
#  ready for cleaning (i.e. contains nothing worth keeping), and, if given
#  the go-ahead, clean up by removing the whole damned lot.
#
set progname = `basename $0`

if $#argv then
  errecho "$progname takes no arguments."
  exit 1
endif

echo "${progname}: the Mac Unix clutter is in this state:"
ls -algF ~/.finderinfo ~/.resource ~/mac |& sed 's/^/	/'
echo -n "Are you sure this is unimportant enough to just wipe? [ny] "
set response = "$<"
if ("$response" == y) then
  echo -n "OK, cleaning up Mac Unix clutter....."
  rm -rf ~/.finderinfo ~/.resource ~/mac
  echo "done."
else
  echo "OK, leaving Mac Unix clutter alone."
endif
@