From 6adafae34f2e04d2340b36e514ff190bdbab2e6b Mon Sep 17 00:00:00 2001
From: Tanaka Akira <akr@users.sourceforge.net>
Date: Thu, 19 Aug 1999 14:41:32 +0000
Subject: zsh-workers/7450

---
 Completion/Base/_arguments    | 4 ++--
 Completion/Base/_long_options | 8 ++++----
 Completion/Base/_subscript    | 4 ++--
 Completion/Builtins/_zmodload | 4 ++--
 Completion/User/_gdb          | 2 +-
 5 files changed, 11 insertions(+), 11 deletions(-)

(limited to 'Completion')

diff --git a/Completion/Base/_arguments b/Completion/Base/_arguments
index 5170acb84..5e0d35d44 100644
--- a/Completion/Base/_arguments
+++ b/Completion/Base/_arguments
@@ -372,13 +372,13 @@ else
 
       # If the action starts with a space, we just call it.
 
-      $=action
+      ${(e)=~action}
     else
 
       # Otherwise we call it with the description-arguments built above.
 
       action=( $=action )
-      "$action[1]" "$expl[@]" "${(@)action[2,-1]}"
+      ${(e)action[1]} "$expl[@]" ${(e)~action[2,-1]}
     fi
   fi
 
diff --git a/Completion/Base/_long_options b/Completion/Base/_long_options
index f82de9ed5..461da893c 100644
--- a/Completion/Base/_long_options
+++ b/Completion/Base/_long_options
@@ -260,10 +260,10 @@ if [[ "$str" = *\=* ]]; then
         compadd "$expl[@]" - ${=action[2,-2]}
       elif (( $#action )); then
         if [[ "$action" = \ * ]]; then
-          $=action
+          ${(e)=~action}
         else
 	  action=($=action)
-	  $action[1] "$expl[@]" $action[2,-1]
+	  ${(e)action[1]} "$expl[@]" ${(e)~action[2,-1]}
         fi
       fi
 
@@ -310,10 +310,10 @@ if [[ "$str" = *\=* ]]; then
       if [[ "$parta[1]" = (\[|\() ]]; then
         compadd "$expl[@]" - ${=parta[2,-2]}
       elif [[ "$parta" = \ * ]]; then
-        $=parta
+        ${(e)=~parta}
       else
 	action=($=parta)
-	$action[1] "$expl[@]" $action[2,-1]
+	${(e)~parta[1]} "$expl[@]" ${(e)~action[2,-1]}
       fi
     else
       compadd -S '' - "$PREFIX"
diff --git a/Completion/Base/_subscript b/Completion/Base/_subscript
index 090a5f07a..76644bafb 100644
--- a/Completion/Base/_subscript
+++ b/Completion/Base/_subscript
@@ -4,8 +4,8 @@ local expl
 
 if [[ "$PREFIX" = :* ]]; then
   _description expl 'character class'
-  compadd -p: -S ':]' alnum alpha blank cntrl digit graph lower print punct \
-      space upper xdigit
+  compadd "$expl[@]" -p: -S ':]' alnum alpha blank cntrl digit graph \
+                                 lower print punct space upper xdigit
 elif [[ ${(Pt)${compstate[parameter]}} = assoc* ]]; then
   _description expl 'association key'
   if [[ "$RBUFFER" = \]* ]]; then
diff --git a/Completion/Builtins/_zmodload b/Completion/Builtins/_zmodload
index 9bac1484e..a4f13c0ed 100644
--- a/Completion/Builtins/_zmodload
+++ b/Completion/Builtins/_zmodload
@@ -7,8 +7,8 @@ if [[ "$fl" = -*(a*u|u*a)* || "$fl" = -*a* && CURRENT -ge 4 ]]; then
   compgen "$expl[@]" -B
 elif [[ "$fl" = -*u* ]]; then
   _description expl module
-  compadd - $(zmodload)
+  compadd "$expl[@]" - $(zmodload)
 else
   _description expl 'module file'
-  compadd - ${^module_path}/*(N:t:r)
+  compadd "$expl[@]" - ${^module_path}/*(N:t:r)
 fi
diff --git a/Completion/User/_gdb b/Completion/User/_gdb
index 1dba7819d..54213a08a 100644
--- a/Completion/User/_gdb
+++ b/Completion/User/_gdb
@@ -52,6 +52,6 @@ else
     return ret
   else
     _description expl executable
-    _files -/g '*(*)'
+    _files "$expl[@]" -/g '*(*)'
   fi
 fi
-- 
cgit 1.4.1