Mercurial > emacs
changeset 12066:b9b0b3f96dc2
(output_authors): Allow ':' in time zone, as per ISO 8601 and RCS 5.6.8 beta.
| author | Paul Eggert <eggert@twinsun.com> |
|---|---|
| date | Sun, 04 Jun 1995 01:34:39 +0000 |
| parents | 094636c759bf |
| children | 73dc8205d259 |
| files | lib-src/=rcs2log lib-src/rcs2log |
| diffstat | 2 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lib-src/=rcs2log Sat Jun 03 17:32:10 1995 +0000 +++ b/lib-src/=rcs2log Sun Jun 04 01:34:39 1995 +0000 @@ -285,7 +285,7 @@ EOF esac output_authors='/^date: / { - if ($2 ~ /^[0-9]*[-\/][0-9][0-9][-\/][0-9][0-9]$/ && $3 ~ /^[0-9][0-9]:[0-9][0-9]:[0-9][0-9][-+0-9]*;$/ && $4 == "author:" && $5 ~ /^[^;]*;$/) { + if ($2 ~ /^[0-9]*[-\/][0-9][0-9][-\/][0-9][0-9]$/ && $3 ~ /^[0-9][0-9]:[0-9][0-9]:[0-9][0-9][-+0-9:]*;$/ && $4 == "author:" && $5 ~ /^[^;]*;$/) { print substr($5, 1, length($5)-1) } }'
--- a/lib-src/rcs2log Sat Jun 03 17:32:10 1995 +0000 +++ b/lib-src/rcs2log Sun Jun 04 01:34:39 1995 +0000 @@ -285,7 +285,7 @@ EOF esac output_authors='/^date: / { - if ($2 ~ /^[0-9]*[-\/][0-9][0-9][-\/][0-9][0-9]$/ && $3 ~ /^[0-9][0-9]:[0-9][0-9]:[0-9][0-9][-+0-9]*;$/ && $4 == "author:" && $5 ~ /^[^;]*;$/) { + if ($2 ~ /^[0-9]*[-\/][0-9][0-9][-\/][0-9][0-9]$/ && $3 ~ /^[0-9][0-9]:[0-9][0-9]:[0-9][0-9][-+0-9:]*;$/ && $4 == "author:" && $5 ~ /^[^;]*;$/) { print substr($5, 1, length($5)-1) } }'