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 -# $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