Fix expr usage for FreeBSD

Some implementations of "expr" (e.g. FreeBSD's) fail, if an
argument starts with a dash.

Signed-off-by: Dennis Stosberg <dennis@stosberg.net>
Signed-off-by: Junio C Hamano <junkio@cox.net>
This commit is contained in:
Dennis Stosberg 2006-06-27 18:54:26 +02:00 committed by Junio C Hamano
parent 1ef9e05dbf
commit 8096fae726
7 changed files with 16 additions and 16 deletions

View File

@ -97,7 +97,7 @@ while case "$#" in 0) break;; esac
do do
case "$1" in case "$1" in
-d=*|--d=*|--do=*|--dot=*|--dote=*|--dotes=*|--dotest=*) -d=*|--d=*|--do=*|--dot=*|--dote=*|--dotes=*|--dotest=*)
dotest=`expr "$1" : '-[^=]*=\(.*\)'`; shift ;; dotest=`expr "z$1" : 'z-[^=]*=\(.*\)'`; shift ;;
-d|--d|--do|--dot|--dote|--dotes|--dotest) -d|--d|--do|--dot|--dote|--dotes|--dotest)
case "$#" in 1) usage ;; esac; shift case "$#" in 1) usage ;; esac; shift
dotest="$1"; shift;; dotest="$1"; shift;;

View File

@ -133,7 +133,7 @@ while
*,--reference) *,--reference)
shift; reference="$1" ;; shift; reference="$1" ;;
*,--reference=*) *,--reference=*)
reference=`expr "$1" : '--reference=\(.*\)'` ;; reference=`expr "z$1" : 'z--reference=\(.*\)'` ;;
*,-o|*,--or|*,--ori|*,--orig|*,--origi|*,--origin) *,-o|*,--or|*,--ori|*,--orig|*,--origi|*,--origin)
case "$2" in case "$2" in
'') '')

View File

@ -223,13 +223,13 @@ do
-F*|-f*) -F*|-f*)
no_edit=t no_edit=t
log_given=t$log_given log_given=t$log_given
logfile=`expr "$1" : '-[Ff]\(.*\)'` logfile=`expr "z$1" : 'z-[Ff]\(.*\)'`
shift shift
;; ;;
--F=*|--f=*|--fi=*|--fil=*|--file=*) --F=*|--f=*|--fi=*|--fil=*|--file=*)
no_edit=t no_edit=t
log_given=t$log_given log_given=t$log_given
logfile=`expr "$1" : '-[^=]*=\(.*\)'` logfile=`expr "z$1" : 'z-[^=]*=\(.*\)'`
shift shift
;; ;;
-a|--a|--al|--all) -a|--a|--al|--all)
@ -237,7 +237,7 @@ do
shift shift
;; ;;
--au=*|--aut=*|--auth=*|--autho=*|--author=*) --au=*|--aut=*|--auth=*|--autho=*|--author=*)
force_author=`expr "$1" : '-[^=]*=\(.*\)'` force_author=`expr "z$1" : 'z-[^=]*=\(.*\)'`
shift shift
;; ;;
--au|--aut|--auth|--autho|--author) --au|--aut|--auth|--autho|--author)
@ -277,11 +277,11 @@ $1"
log_given=m$log_given log_given=m$log_given
if test "$log_message" = '' if test "$log_message" = ''
then then
log_message=`expr "$1" : '-m\(.*\)'` log_message=`expr "z$1" : 'z-m\(.*\)'`
else else
log_message="$log_message log_message="$log_message
`expr "$1" : '-m\(.*\)'`" `expr "z$1" : 'z-m\(.*\)'`"
fi fi
no_edit=t no_edit=t
shift shift
@ -290,11 +290,11 @@ $1"
log_given=m$log_given log_given=m$log_given
if test "$log_message" = '' if test "$log_message" = ''
then then
log_message=`expr "$1" : '-[^=]*=\(.*\)'` log_message=`expr "z$1" : 'z-[^=]*=\(.*\)'`
else else
log_message="$log_message log_message="$log_message
`expr "$1" : '-[^=]*=\(.*\)'`" `expr "z$1" : 'zq-[^=]*=\(.*\)'`"
fi fi
no_edit=t no_edit=t
shift shift
@ -321,7 +321,7 @@ $1"
--reedit-me=*|--reedit-mes=*|--reedit-mess=*|--reedit-messa=*|\ --reedit-me=*|--reedit-mes=*|--reedit-mess=*|--reedit-messa=*|\
--reedit-messag=*|--reedit-message=*) --reedit-messag=*|--reedit-message=*)
log_given=t$log_given log_given=t$log_given
use_commit=`expr "$1" : '-[^=]*=\(.*\)'` use_commit=`expr "z$1" : 'z-[^=]*=\(.*\)'`
no_edit= no_edit=
shift shift
;; ;;
@ -346,7 +346,7 @@ $1"
--reuse-mes=*|--reuse-mess=*|--reuse-messa=*|--reuse-messag=*|\ --reuse-mes=*|--reuse-mess=*|--reuse-messa=*|--reuse-messag=*|\
--reuse-message=*) --reuse-message=*)
log_given=t$log_given log_given=t$log_given
use_commit=`expr "$1" : '-[^=]*=\(.*\)'` use_commit=`expr "z$1" : 'z-[^=]*=\(.*\)'`
no_edit=t no_edit=t
shift shift
;; ;;

View File

@ -103,7 +103,7 @@ do
-s|--s|--st|--str|--stra|--strat|--strate|--strateg|--strategy) -s|--s|--st|--str|--stra|--strat|--strate|--strateg|--strategy)
case "$#,$1" in case "$#,$1" in
*,*=*) *,*=*)
strategy=`expr "$1" : '-[^=]*=\(.*\)'` ;; strategy=`expr "z$1" : 'z-[^=]*=\(.*\)'` ;;
1,*) 1,*)
usage ;; usage ;;
*) *)

View File

@ -24,7 +24,7 @@ do
-s|--s|--st|--str|--stra|--strat|--strate|--strateg|--strategy) -s|--s|--st|--str|--stra|--strat|--strate|--strateg|--strategy)
case "$#,$1" in case "$#,$1" in
*,*=*) *,*=*)
strategy=`expr "$1" : '-[^=]*=\(.*\)'` ;; strategy=`expr "z$1" : 'z-[^=]*=\(.*\)'` ;;
1,*) 1,*)
usage ;; usage ;;
*) *)

View File

@ -9,7 +9,7 @@ while case "$#" in 0) break;; esac
do do
case "$1" in case "$1" in
--au=*|--aut=*|--auth=*|--autho=*|--author=*) --au=*|--aut=*|--auth=*|--autho=*|--author=*)
quilt_author=$(expr "$1" : '-[^=]*\(.*\)') quilt_author=$(expr "z$1" : 'z-[^=]*\(.*\)')
shift shift
;; ;;
@ -26,7 +26,7 @@ do
;; ;;
--pa=*|--pat=*|--patc=*|--patch=*|--patche=*|--patches=*) --pa=*|--pat=*|--patc=*|--patch=*|--patche=*|--patches=*)
QUILT_PATCHES=$(expr "$1" : '-[^=]*\(.*\)') QUILT_PATCHES=$(expr "z$1" : 'z-[^=]*\(.*\)')
shift shift
;; ;;

View File

@ -179,7 +179,7 @@ do
-s|--s|--st|--str|--stra|--strat|--strate|--strateg|--strategy) -s|--s|--st|--str|--stra|--strat|--strate|--strateg|--strategy)
case "$#,$1" in case "$#,$1" in
*,*=*) *,*=*)
strategy=`expr "$1" : '-[^=]*=\(.*\)'` ;; strategy=`expr "z$1" : 'z-[^=]*=\(.*\)'` ;;
1,*) 1,*)
usage ;; usage ;;
*) *)