From c1dc0ffe4f35aa48a9fbe4e9f5f7252d63634a1c Mon Sep 17 00:00:00 2001
From: Tanaka Akira <akr@users.sourceforge.net>
Date: Sat, 6 May 2000 07:59:52 +0000
Subject: 11223: Completion/Base/_regex_arguments, Completion/Debian/_apt,
 Completion/X/_xset, Completion/X/_xwit, Doc/Zsh/compsys.yo: _regex_arguments
 use _alternative.

---
 Completion/Base/_regex_arguments | 15 +--------------
 1 file changed, 1 insertion(+), 14 deletions(-)

(limited to 'Completion/Base')

diff --git a/Completion/Base/_regex_arguments b/Completion/Base/_regex_arguments
index 1fc43f6a7..635cd0e5f 100644
--- a/Completion/Base/_regex_arguments
+++ b/Completion/Base/_regex_arguments
@@ -81,20 +81,7 @@ _regex_arguments () {
 	_ra_left="$_ra_line[_ra_p1 + 1, _ra_p2]"
 	_ra_right="$_ra_line[_ra_p2 + 1, -1]"
 	compset -p $(( $#PREFIX - $#_ra_line + $_ra_p1 ))
-	tmp=("${(@)_ra_actions%%:*}")
-	if (( $#tmp )); then
-	  _tags "$tmp[@]"
-	  while _tags; do
-	    for _ra_com in "$_ra_actions[@]"; do
-	      if _requested "${_ra_com%%:*}"; then
-		while _next_label "${_ra_com%%:*}" expl "${${_ra_com#*:}%%:*}"; do
-		  eval "${_ra_com#*:*:}"
-		done
-		[[ nm -ne "$compstate[nmatches]" ]] && break 2
-	      fi
-	    done
-	  done
-	fi
+	(( $#_ra_actions )) && _alternative "$_ra_actions[@]"
       fi
       ;;
     3) _message "invalid regex";;
-- 
cgit 1.4.1