mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00
Code Issues Projects Releases Wiki Activity

When given no file arguments, inspect RCS/.* as well

Browse source 
as RCS/*.  Don't report an error if RCS is empty or nonexistent.
This commit is contained in:
Richard M. Stallman 1993-05-29 06:22:48 +00:00
parent 5b335fca24
commit 148d61aa7f
1 changed files with 24 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

29
lib-src/rcs2log
View file

@ -12,7 +12,7 @@
# Author: Paul Eggert <eggert@twinsun.com> # Author: Paul Eggert <eggert@twinsun.com>
# $Id: rcs2log,v 1.10 1993/03/16 22:49:00 eggert Exp eggert $ # $Id: rcs2log,v 1.11 1993/05/03 17:55:22 eggert Exp rms $
# Copyright 1992, 1993 Free Software Foundation, Inc. # Copyright 1992, 1993 Free Software Foundation, Inc.
@ -30,6 +30,8 @@
# along with this program; see the file COPYING. If not, write to # along with this program; see the file COPYING. If not, write to
# the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. # the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
nl='
'
# Parse options. # Parse options.
@ -114,14 +116,31 @@ then
fi fi
datearg="-d>$date" datearg="-d>$date"
# With no arguments, examine all files under the RCS directory.
case $# in
0)
files=
for file in RCS/.* RCS/*
do
case $file in
RCS/. | RCS/..) ;;
RCS/.\* | RCS/\*) test -f "$file" && files=$files$nl$file;;
*) files=$files$nl$file
esac
done
case $files in
'') exit 0
esac
oldIFS=$IFS
IFS=$nl
set $files
IFS=$oldIFS
esac
rlogout=/tmp/chg$$ rlogout=/tmp/chg$$
trap exit 1 2 13 15 trap exit 1 2 13 15
trap 'rm -f $rlogout; exit 1' 0 trap 'rm -f $rlogout; exit 1' 0
case $# in
0) set RCS/*
esac
rlog "$datearg" "$@" >$rlogout || exit rlog "$datearg" "$@" >$rlogout || exit