From e112b6309790fab52632f8cd8e6a5bd61bcfd4b3 Mon Sep 17 00:00:00 2001 From: Joel Sherrill Date: Wed, 28 Jul 1999 18:04:52 +0000 Subject: Patch to remove rcs-clean.in as it is unused from Ralf Corsepius . --- tools/build/rcs-clean.in | 73 ------------------------------------------------ 1 file changed, 73 deletions(-) delete mode 100644 tools/build/rcs-clean.in (limited to 'tools/build/rcs-clean.in') diff --git a/tools/build/rcs-clean.in b/tools/build/rcs-clean.in deleted file mode 100644 index 83fed05128..0000000000 --- a/tools/build/rcs-clean.in +++ /dev/null @@ -1,73 +0,0 @@ -#!@KSH@ -p -# -# $Id$ -# -# Delete all files from the current directory that can be recreated -# via RCS 'co' commonds -# Used by 'make clobber' -# - -progname=${0##*/} # fast basename hack for ksh, bash - -USAGE=\ -"usage: $progname [ -v ]" - -fatal() { - if [ "$1" ] - then - echo $* >&2 - fi - echo "$USAGE" 1>&2 - exit 1 -} - -# -# process the options -# - -verbose="" - -while getopts v OPT -do - case "$OPT" in - v) - verbose="yes";; - *) - fatal - esac -done - -let $((shiftcount = $OPTIND - 1)) -shift $shiftcount - -args=$* -[ "$args" ] && fatal - -[ -d RCS/. ] || exit 0 - -# there is probably a better way to do this - -rcs_files=`echo RCS/*,v | sed -e 's?RCS/??g' -e's/,v//g'` - -kills="" -for f in $rcs_files -do - # build list of all files in RCS/*,v that are *not* locked - if [ -f $f ] && [ ! -w $f ] && [ -f RCS/$f,v ] - then - locked=`rlog -L -R $f` - [ "$locked" = "" ] && kills="$kills $f" - fi -done - -if [ "$kills" ] -then - [ "$verbose" ] && echo rm -f $kills - rm -f $kills -fi - -exit 0 - -# Local Variables: *** -# mode:ksh *** -# End: *** -- cgit v1.2.3