Mercurial > emacs
diff lib-src/=rcs2log @ 2639:0e6a6d065a94
mawk, SunOS 4.1.3 nawk, and Ultrix/MKS nawk all barf on /[/]/, so change
it to /[\/]/. This should work on all Posix-compliant awks.
It's slightly wrong with traditional (Unix version 7) awk, since it
also allows \, but that's a minor problem compared to awk syntax errors.
author | Paul Eggert <eggert@twinsun.com> |
---|---|
date | Mon, 03 May 1993 17:55:22 +0000 |
parents | 66371f0b8aff |
children | 9ee93fc9aba0 |
line wrap: on
line diff
--- a/lib-src/=rcs2log Mon May 03 15:34:46 1993 +0000 +++ b/lib-src/=rcs2log Mon May 03 17:55:22 1993 +0000 @@ -12,7 +12,7 @@ # Author: Paul Eggert <eggert@twinsun.com> -# $Id: rcs2log,v 1.9 1993/01/15 05:33:29 eggert Exp $ +# $Id: rcs2log,v 1.10 1993/03/16 22:49:00 eggert Exp eggert $ # Copyright 1992, 1993 Free Software Foundation, Inc. @@ -223,7 +223,7 @@ /^Working file:/ { filename = $3 } /^date: /, /^(-----------*|===========*)$/ { if ($0 ~ /^branches: /) { next } - if ($0 ~ /^date: [0-9][ /0-9:]*;/) { + if ($0 ~ /^date: [0-9][ \/0-9:]*;/) { time = substr($3, 1, length($3)-1) author = substr($5, 1, length($5)-1) printf "%s %s %s %s %c", filename, $2, time, author, 13