fix some distributed functions that depend on shortloops

[Mikael Magnusson <mikachu@xxxxxxxxx>]

http://cgit.mika.l3ib.org/cgit/zsh-cvs/patch/?id=1067eea1d44eda8e0c342bc8253fb6ce5075e0b3

diff --git a/Functions/Misc/zargs b/Functions/Misc/zargs
index 58d8461..8350b1a 100644
--- a/Functions/Misc/zargs
+++ b/Functions/Misc/zargs
@@ -207,7 +207,7 @@ then
     else
 	call=($command)
 	# Use "repeat" here so "continue" won't complain.
-	repeat 1 eval "$execute ; $analyze"
+	repeat 1; do eval "$execute ; $analyze"; done
 	return $ret
     fi
 fi
@@ -273,7 +273,7 @@ do
     repeat $P
     do
 	((ARGC)) || break
-	for (( end=l; end && ${(c)#argv[1,end]} > s; end/=2 )) :
+	for (( end=l; end && ${(c)#argv[1,end]} > s; end/=2 )) { }
 	(( end > n && ( end = n ) ))
 	args=( $argv[1,end] )
 	shift $((end > ARGC ? ARGC : end))
diff --git a/Functions/Zle/match-words-by-style
b/Functions/Zle/match-words-by-style
index 69ceba7..b387828 100644
--- a/Functions/Zle/match-words-by-style
+++ b/Functions/Zle/match-words-by-style
@@ -220,8 +220,7 @@ if [[ $wordstyle = *subword* ]]; then
 fi

 match=()
-charskip=
-repeat $skip charskip+=\?
+charskip=${(l:skip::?:)}

 eval pat2='${RBUFFER##(#b)('${charskip}${spacepat}')('\
 ${wordpat2}')('${spacepat}')}'

-- 
Mikael Magnusson