summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPaul Eggert <eggert@twinsun.com>1997-03-21 22:12:24 +0000
committerPaul Eggert <eggert@twinsun.com>1997-03-21 22:12:24 +0000
commitd2a34ed88192b1804aad78a2868d298a30d24013 (patch)
tree4b85328642fe96e947a4dbcb0735314d592624f9
parent533abb3d72b1d5ee6473e1c1843cb0842c27597c (diff)
downloademacs-d2a34ed88192b1804aad78a2868d298a30d24013.tar.gz
(files): Ignore files in RCS directory whose names are of the form ,*,
or *_; they are probably RCS lock files. Also, ignore files named .rcsfreeze.log or .rcsfreeze.ver; they are used by rcsfreeze.
-rw-r--r--lib-src/=rcs2log14
-rwxr-xr-xlib-src/rcs2log14
2 files changed, 22 insertions, 6 deletions
diff --git a/lib-src/=rcs2log b/lib-src/=rcs2log
index 4f2b18ac54c..390bba898cb 100644
--- a/lib-src/=rcs2log
+++ b/lib-src/=rcs2log
@@ -28,7 +28,7 @@ Options:
Report bugs to <bug-gnu-emacs@prep.ai.mit.edu>.'
-Id='$Id: rcs2log,v 1.35 1996/11/03 17:09:27 eggert Exp eggert $'
+Id='$Id: rcs2log,v 1.36 1997/01/20 09:03:05 eggert Exp eggert $'
# Copyright 1992, 1993, 1994, 1995, 1996, 1997 Free Software Foundation, Inc.
@@ -242,7 +242,14 @@ case $# in
files=`
{
case $RCSdirs in
- ?*) find $RCSdirs -type f -print
+ ?*) find $RCSdirs \
+ -type f \
+ ! -name '*_' \
+ ! -name ',*,' \
+ ! -name '.*_' \
+ ! -name .rcsfreeze.log \
+ ! -name .rcsfreeze.ver \
+ -print
esac
find . -name '*,v' -print
} |
@@ -254,7 +261,8 @@ case $# in
for file in RCS/.* RCS/* .*,v *,v
do
case $file in
- RCS/. | RCS/..) continue;;
+ RCS/. | RCS/.. | RCS/,*, | RCS/*_) continue;;
+ RCS/.rcsfreeze.log | RCS/.rcsfreeze.ver) continue;;
RCS/.\* | RCS/\* | .\*,v | \*,v) test -f "$file" || continue
esac
files=$files$nl$file
diff --git a/lib-src/rcs2log b/lib-src/rcs2log
index 4f2b18ac54c..390bba898cb 100755
--- a/lib-src/rcs2log
+++ b/lib-src/rcs2log
@@ -28,7 +28,7 @@ Options:
Report bugs to <bug-gnu-emacs@prep.ai.mit.edu>.'
-Id='$Id: rcs2log,v 1.35 1996/11/03 17:09:27 eggert Exp eggert $'
+Id='$Id: rcs2log,v 1.36 1997/01/20 09:03:05 eggert Exp eggert $'
# Copyright 1992, 1993, 1994, 1995, 1996, 1997 Free Software Foundation, Inc.
@@ -242,7 +242,14 @@ case $# in
files=`
{
case $RCSdirs in
- ?*) find $RCSdirs -type f -print
+ ?*) find $RCSdirs \
+ -type f \
+ ! -name '*_' \
+ ! -name ',*,' \
+ ! -name '.*_' \
+ ! -name .rcsfreeze.log \
+ ! -name .rcsfreeze.ver \
+ -print
esac
find . -name '*,v' -print
} |
@@ -254,7 +261,8 @@ case $# in
for file in RCS/.* RCS/* .*,v *,v
do
case $file in
- RCS/. | RCS/..) continue;;
+ RCS/. | RCS/.. | RCS/,*, | RCS/*_) continue;;
+ RCS/.rcsfreeze.log | RCS/.rcsfreeze.ver) continue;;
RCS/.\* | RCS/\* | .\*,v | \*,v) test -f "$file" || continue
esac
files=$files$nl$file