diff options
author | Paul Eggert <eggert@twinsun.com> | 1992-02-05 17:25:10 +0000 |
---|---|---|
committer | Paul Eggert <eggert@twinsun.com> | 1992-02-05 17:25:10 +0000 |
commit | ff17867bb63f7b339cf593bb1b554a86f5c976c0 (patch) | |
tree | 58483ee51c7365fdc781c085a89c0969782ded0f /lib-src/rcs2log | |
parent | 4ca2c4b44e025ab2478a41ef25177219388ed44e (diff) | |
download | emacs-ff17867bb63f7b339cf593bb1b554a86f5c976c0.tar.gz |
Don't munge $* when getting date from ChangeLog.
Diffstat (limited to 'lib-src/rcs2log')
-rwxr-xr-x | lib-src/rcs2log | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lib-src/rcs2log b/lib-src/rcs2log index d5fe742e39f..279e78069fa 100755 --- a/lib-src/rcs2log +++ b/lib-src/rcs2log @@ -2,7 +2,7 @@ # RCS to ChangeLog generator -# $Id: rcs2clog,v 1.2 1992/02/05 04:29:40 eggert Exp $ +# $Id: rcs2clog,v 1.2 1992/02/05 04:31:18 eggert Exp eggert $ # Generate a change log prefix from RCS/* and the existing ChangeLog (if any). # Output the new prefix to standard output. @@ -35,9 +35,11 @@ done datearg=-d'>1970' if test -s ChangeLog then - date=`sed 1q <ChangeLog` || exit - set x $date; shift - datearg="-d>$1 $2 $3 $4 $5" + e='s/^\(...\) \(...\) \(..\) \(..:..:..\) \(....\) .*/\1 \2 \3 \4 \5/p; 1q' + date=`sed -n "$e" <ChangeLog` || exit + case $date in + ?*) datearg="-d>$date" + esac fi rlogout=/tmp/chg$$ |