Mercurial > emacs
diff lib-src/rcs2log @ 16507:08855b88e955
When processing cvs log output, remove `Attic/' from repository file names.
| author | Paul Eggert <eggert@twinsun.com> |
|---|---|
| date | Sun, 03 Nov 1996 17:09:27 +0000 |
| parents | 30536ab085c7 |
| children | 04ad9edd12b3 |
line wrap: on
line diff
--- a/lib-src/rcs2log Sat Nov 02 20:26:18 1996 +0000 +++ b/lib-src/rcs2log Sun Nov 03 17:09:27 1996 +0000 @@ -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 @@ 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 = "?" }