#!/bin/sh
#
# $Id: expunge,v 1.1 1993/02/02 21:54:04 ejb Exp $
# $Source: /home/ejb/scripts/RCS/expunge,v $
# $Author: ejb $
#
# Poor substitute for expunge from delete software from Athena
#
if [ $# -eq 0 ]; then
   dirs="."
else
   dirs="$*"
fi

pwd=`pwd`
for i in $dirs; do
   rm $i/.#*
done