From 4327ea2c5c0bad2fd8bb0dcf4b8c34c51430c95e Mon Sep 17 00:00:00 2001
From: Tanaka Akira <akr@users.sourceforge.net>
Date: Thu, 21 Oct 1999 15:36:39 +0000
Subject: zsh-workers/8361

---
 Completion/Builtins/_cd   | 36 +-----------------------------------
 Completion/Builtins/_popd | 40 ++++++++++++++++++++++++++++++++++++++++
 2 files changed, 41 insertions(+), 35 deletions(-)
 create mode 100644 Completion/Builtins/_popd

(limited to 'Completion')

diff --git a/Completion/Builtins/_cd b/Completion/Builtins/_cd
index 8872d6d80..838b1af24 100644
--- a/Completion/Builtins/_cd
+++ b/Completion/Builtins/_cd
@@ -25,41 +25,7 @@ if [[ CURRENT -eq 3 ]]; then
   rep=(${${rep#${PWD%%$words[2]*}}%${PWD#*$words[2]}})
   _description expl replacement
   (( ! $#rep )) || compadd "$expl[@]" $rep
-elif [[ $PREFIX = [-+]* ]]; then
-  # pushd: just complete the numbers, but show the full directory list with
-  # numbers.
-  # For - we do the same thing, but reverse the numbering (other
-  # way round if pushdminus is set).
-  # The test is for pu* because I have an alias pu since I'm too
-  # lazy to type pushd.
-  IPREFIX=$PREFIX[1]
-  PREFIX=$PREFIX[2,-1]
-  local list lines revlines ret=1 i
-
-  # get the list of directories with their canonical number
-  # and turn the lines into an array, removing the current directory
-  lines=( ${${(f)"$(dirs -v)"}##0*} )
-  if [[ ( $IPREFIX = - && ! -o pushdminus ) ||
-        ( $IPREFIX = + && -o pushdminus ) ]]; then
-    integer i
-    revlines=( $lines )
-    for (( i = 1; i <= $#lines; i++ )); do
-      lines[$i]="$((i-1)) -- ${revlines[-$i]##[0-9]#[	 ]#}"
-    done
-  else
-    for (( i = 1; i <= $#lines; i++ )); do
-      lines[$i]="$i -- ${lines[$i]##[0-9]#[	 ]#}"
-    done
-  fi
-  # get the array of numbers only
-  list=(${lines%% *})
-  _description expl 'directory stack index'
-  compadd "$expl[@]" -ld lines -V dirs -Q - "$list[@]" && ret=0
-  [[ -z $compstate[list] ]] && compstate[list]=list && ret=0
-  [[ -n $compstate[insert] ]] && compstate[insert]=menu && ret=0
-
-  return ret
-elif [[ $PREFIX != (\~|/|./|../)* && $#cdpath -ne 0 ]]; then
+elif _popd || [[ $PREFIX != (\~|/|./|../)* && $#cdpath -ne 0 ]]; then
   local tdir tdir2
   # With cdablevars, we can convert foo/bar/... to ~foo/bar/... if
   # there is no directory foo.  In that case we could also complete
diff --git a/Completion/Builtins/_popd b/Completion/Builtins/_popd
new file mode 100644
index 000000000..9054befb7
--- /dev/null
+++ b/Completion/Builtins/_popd
@@ -0,0 +1,40 @@
+#compdef popd
+
+# This just completes the numbers after +, showing the full directory list
+# with numbers. For - we do the same thing, but reverse the numbering (other
+# way round if pushdminus is set). Note that this function is also called
+# from _cd for cd and pushd.
+
+emulate -L zsh
+setopt extendedglob nonomatch
+
+[[ $PREFIX = [-+]* ]] || return 1
+
+local expl list lines revlines ret=1 i
+
+IPREFIX=$PREFIX[1]
+PREFIX=$PREFIX[2,-1]
+
+# get the list of directories with their canonical number
+# and turn the lines into an array, removing the current directory
+lines=( ${${(f)"$(dirs -v)"}##0*} )
+if [[ ( $IPREFIX = - && ! -o pushdminus ) ||
+      ( $IPREFIX = + && -o pushdminus ) ]]; then
+  integer i
+  revlines=( $lines )
+  for (( i = 1; i <= $#lines; i++ )); do
+    lines[$i]="$((i-1)) -- ${revlines[-$i]##[0-9]#[	 ]#}"
+  done
+else
+  for (( i = 1; i <= $#lines; i++ )); do
+    lines[$i]="$i -- ${lines[$i]##[0-9]#[	 ]#}"
+  done
+fi
+# get the array of numbers only
+list=(${lines%% *})
+_description expl 'directory stack index'
+compadd "$expl[@]" -ld lines -V dirs -Q - "$list[@]" && ret=0
+[[ -z $compstate[list] ]] && compstate[list]=list && ret=0
+[[ -n $compstate[insert] ]] && compstate[insert]=menu && ret=0
+
+return ret
-- 
cgit 1.4.1