diff options
author | Paul Eggert <eggert@twinsun.com> | 1995-03-21 23:14:41 +0000 |
---|---|---|
committer | Paul Eggert <eggert@twinsun.com> | 1995-03-21 23:14:41 +0000 |
commit | df0a51937ee91ce21ad311ad2d38ba3a02792e6e (patch) | |
tree | 438485b727b62b2bd8d794f641863ce84f31d36b /lib-src/rcs2log | |
parent | 3243f24c1b2a2640f928b62fdf2c890b70f5511e (diff) | |
download | emacs-df0a51937ee91ce21ad311ad2d38ba3a02792e6e.tar.gz |
Treat -u 'LOGIN:FULLNAME:MAILADDR' as if it were
-u 'LOGIN<tab>FULLNAME<tab>MAILADDR'.
Diffstat (limited to 'lib-src/rcs2log')
-rwxr-xr-x | lib-src/rcs2log | 18 |
1 files changed, 14 insertions, 4 deletions
diff --git a/lib-src/rcs2log b/lib-src/rcs2log index 5760a41b8c1..d5b8186e97e 100755 --- a/lib-src/rcs2log +++ b/lib-src/rcs2log @@ -12,7 +12,7 @@ # Author: Paul Eggert <eggert@twinsun.com> -# $Id: rcs2log,v 1.19 1995/03/21 05:11:06 eggert Exp $ +# $Id: rcs2log,v 1.19 1995/03/21 05:37:42 eggert Exp eggert $ # Copyright 1992, 1993, 1994, 1995 Free Software Foundation, Inc. @@ -64,14 +64,21 @@ do loginFullnameMailaddrs=$loginFullnameMailaddrs$nl$2$tab$3$tab$4 shift; shift; shift;; -u) + # If $2 is not tab-separated, use colon for separator. case ${2?} in *"$nl"*) echo >&2 "$0: -u '$2': newlines not allowed" exit 1;; - *"$tab"*"$tab"*"$tab"*) + *"$tab"*) + t=$tab;; + *) + t=: + esac + case $2 in + *"$t"*"$t"*"$t"*) echo >&2 "$0: -u '$2': too many fields" exit 1;; - *"$tab"*"$tab"*) + *"$t"*"$t"*) ;; *) echo >&2 "$0: -u '$2': not enough fields" @@ -244,7 +251,10 @@ EOF IFS=$nl for loginFullnameMailaddr in $loginFullnameMailaddrs do - IFS=$tab + case $loginFullnameMailaddr in + *"$tab"*) IFS=$tab;; + *) IFS=: + esac set x $loginFullnameMailaddr login=$2 fullname=$3 |