Commit 8fa39615 authored by Stefan Monnier's avatar Stefan Monnier

* lisp/pcmpl-linux.el (pcomplete-pare-list): Re-add, from pcomplete.el.

Fixes: debbugs:8958
parent 2f11b3f1
2011-07-04 Stefan Monnier <monnier@iro.umontreal.ca>
* pcmpl-linux.el (pcomplete-pare-list): Re-add, from pcomplete.el
(bug#8958).
2011-07-04 Chong Yidong <cyd@stupidchicken.com>
* font-lock.el (font-lock-builtin-face): Change light background
......
......@@ -83,6 +83,19 @@
(forward-line)))
(pcomplete-uniqify-list points))))
(defun pcomplete-pare-list (l r)
"Destructively remove from list L all elements matching any in list R.
Test is done using `equal'."
(while (and l (and r (member (car l) r)))
(setq l (cdr l)))
(let ((m l))
(while m
(while (and (cdr m)
(and r (member (cadr m) r)))
(setcdr m (cddr m)))
(setq m (cdr m))))
l)
(defun pcmpl-linux-mountable-directories ()
"Return a list of mountable directory names."
(let (points)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment