From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Tue, 1 Dec 2009 19:42:28 +0000 (+0000)
Subject: (pcomplete/cd): Complete more than one argument, just in case.
X-Git-Tag: emacs-pretest-23.1.90~133
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f3b757f540fd7290ccd6a94306a915f12c10e3c9;p=emacs.git

(pcomplete/cd): Complete more than one argument, just in case.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d221bf207af..83b80072381 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2009-12-01  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+	* pcmpl-unix.el (pcomplete/cd): Complete more than one argument, just
+	in case.
+
 	* pcomplete.el (pcomplete-std-complete): Don't try to complete past
 	the last element.
 
diff --git a/lisp/pcmpl-unix.el b/lisp/pcmpl-unix.el
index c12920f76d2..9d33ed19621 100644
--- a/lisp/pcmpl-unix.el
+++ b/lisp/pcmpl-unix.el
@@ -51,7 +51,7 @@ with the SSH option \"HashKnownHosts no\"."
 ;;;###autoload
 (defun pcomplete/cd ()
   "Completion for `cd'."
-  (pcomplete-here (pcomplete-dirs)))
+  (while (pcomplete-here (pcomplete-dirs))))
 
 ;;;###autoload
 (defalias 'pcomplete/pushd 'pcomplete/cd)