summaryrefslogtreecommitdiff
path: root/lisp/pcmpl-gnu.el
diff options
context:
space:
mode:
authorThierry Volpiatto <thierry.volpiatto@gmail.com>2016-02-26 16:01:46 +1030
committerLars Ingebrigtsen <larsi@gnus.org>2016-02-26 16:01:46 +1030
commiteea55f4f4af311bbd4b197564d1cecbc949616bf (patch)
tree054429c53caa11ce81be877344c448a037174bd4 /lisp/pcmpl-gnu.el
parent4861b50e439443a1ba8a867c88faf28ae3737706 (diff)
downloademacs-eea55f4f4af311bbd4b197564d1cecbc949616bf.tar.gz
Update pcomplete/find
* lisp/pcmpl-gnu.el (pcomplete/find): Update to newest version (bug#10487).
Diffstat (limited to 'lisp/pcmpl-gnu.el')
-rw-r--r--lisp/pcmpl-gnu.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/pcmpl-gnu.el b/lisp/pcmpl-gnu.el
index 84e42aefbf9..e4e8f3a2c53 100644
--- a/lisp/pcmpl-gnu.el
+++ b/lisp/pcmpl-gnu.el
@@ -329,8 +329,9 @@
nil 'identity))))
;;;###autoload
+
(defun pcomplete/find ()
- "Completion for GNU find utility."
+ "Completion for the GNU find utility."
(let ((prec (pcomplete-arg 'last -1)))
(cond ((and (pcomplete-match "^-" 'last)
(string= "find" prec))
@@ -361,7 +362,7 @@
(string= prec "-execdir"))
(while (pcomplete-here* (funcall pcomplete-command-completion-function)
(pcomplete-arg 'last) t))))
- (while (pcomplete-here (pcomplete-entries) nil 'identity))))
+ (while (pcomplete-here (pcomplete-dirs) nil 'identity))))
;;;###autoload
(defalias 'pcomplete/gdb 'pcomplete/xargs)