diff options
| author | Paul Eggert <eggert@twinsun.com> | 1996-11-03 17:09:27 +0000 |
|---|---|---|
| committer | Paul Eggert <eggert@twinsun.com> | 1996-11-03 17:09:27 +0000 |
| commit | 87b82ea2a7d9c2534903d6122cf9f7e48c1bab29 (patch) | |
| tree | a7822613637cc89af6e585eaf9e3f1484b2083eb | |
| parent | 97022662dbcf8fe3deb91a6faa8a7cb68d66762d (diff) | |
| download | emacs-87b82ea2a7d9c2534903d6122cf9f7e48c1bab29.tar.gz | |
When processing cvs log output, remove `Attic/' from repository file names.
| -rw-r--r-- | lib-src/=rcs2log | 7 | ||||
| -rwxr-xr-x | lib-src/rcs2log | 7 |
2 files changed, 12 insertions, 2 deletions
diff --git a/lib-src/=rcs2log b/lib-src/=rcs2log index e68c5616e22..44a12bd3da8 100644 --- a/lib-src/=rcs2log +++ b/lib-src/=rcs2log @@ -12,7 +12,7 @@ # Author: Paul Eggert <eggert@twinsun.com> -# $Id: rcs2log,v 1.33 1996/10/12 17:24:45 eggert Exp eggert $ +# $Id: rcs2log,v 1.34 1996/10/13 05:59:42 eggert Exp eggert $ # Copyright 1992, 1993, 1994, 1995, 1996 Free Software Foundation, Inc. @@ -454,6 +454,11 @@ $AWK <$rlogout ' if (filename ~ /,v$/) { filename = substr(filename, 1, length(filename) - 2) } + if (filename ~ /(^|\/)Attic\/[^\/]*$/) { + i = length(filename) + while (substr(filename, i, 1) != "/") i-- + filename = substr(filename, 1, i - 6) substr(filename, i + 1) + } } rev = "?" } diff --git a/lib-src/rcs2log b/lib-src/rcs2log index e68c5616e22..44a12bd3da8 100755 --- a/lib-src/rcs2log +++ b/lib-src/rcs2log @@ -12,7 +12,7 @@ # Author: Paul Eggert <eggert@twinsun.com> -# $Id: rcs2log,v 1.33 1996/10/12 17:24:45 eggert Exp eggert $ +# $Id: rcs2log,v 1.34 1996/10/13 05:59:42 eggert Exp eggert $ # Copyright 1992, 1993, 1994, 1995, 1996 Free Software Foundation, Inc. @@ -454,6 +454,11 @@ $AWK <$rlogout ' if (filename ~ /,v$/) { filename = substr(filename, 1, length(filename) - 2) } + if (filename ~ /(^|\/)Attic\/[^\/]*$/) { + i = length(filename) + while (substr(filename, i, 1) != "/") i-- + filename = substr(filename, 1, i - 6) substr(filename, i + 1) + } } rev = "?" } |