diff options
| author | Paul Eggert <eggert@twinsun.com> | 1995-06-04 01:34:39 +0000 |
|---|---|---|
| committer | Paul Eggert <eggert@twinsun.com> | 1995-06-04 01:34:39 +0000 |
| commit | b62c7261765c63564dbb2093d8db85ba481b14f1 (patch) | |
| tree | 0bf220f69a6e07aba4004721851ff66806a1f8cf /lib-src | |
| parent | e122157f34a87a361508826e6687243a22113d93 (diff) | |
| download | emacs-b62c7261765c63564dbb2093d8db85ba481b14f1.tar.gz | |
(output_authors): Allow ':' in time zone, as per ISO 8601 and RCS 5.6.8 beta.
Diffstat (limited to 'lib-src')
| -rw-r--r-- | lib-src/=rcs2log | 2 | ||||
| -rwxr-xr-x | lib-src/rcs2log | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lib-src/=rcs2log b/lib-src/=rcs2log index 63c4b71ca8c..3bcf5e9ace9 100644 --- a/lib-src/=rcs2log +++ b/lib-src/=rcs2log @@ -285,7 +285,7 @@ $logins 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) } }' diff --git a/lib-src/rcs2log b/lib-src/rcs2log index 63c4b71ca8c..3bcf5e9ace9 100755 --- a/lib-src/rcs2log +++ b/lib-src/rcs2log @@ -285,7 +285,7 @@ $logins 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) } }' |