summaryrefslogtreecommitdiff
path: root/lisp/pcomplete.el
diff options
context:
space:
mode:
authorJohn Wiegley <johnw@newartisans.com>2002-07-31 23:32:14 +0000
committerJohn Wiegley <johnw@newartisans.com>2002-07-31 23:32:14 +0000
commit22eb1d41ef2a3b4975f3d1cc56864cf778ff2435 (patch)
tree105a85ed13c32f88dac20313cf630c15c6a1e6f9 /lisp/pcomplete.el
parentc71cb98b7436c28649d873d3d0cd176df83bf800 (diff)
downloademacs-22eb1d41ef2a3b4975f3d1cc56864cf778ff2435.tar.gz
(pcomplete-comint-setup): Use `add-to-list', to prevent adding the
symbol `pcomplete' to shell-dynamic-complete-functions too many times.
Diffstat (limited to 'lisp/pcomplete.el')
-rw-r--r--lisp/pcomplete.el3
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/pcomplete.el b/lisp/pcomplete.el
index 3ab1619f127..9a1403cc104 100644
--- a/lisp/pcomplete.el
+++ b/lisp/pcomplete.el
@@ -582,8 +582,7 @@ dynamic-complete-functions are kept. For comint mode itself, this is
(symbol-value completef-sym))))
(if elem
(setcar elem 'pcomplete)
- (nconc (symbol-value completef-sym)
- (list 'pcomplete)))))
+ (add-to-list completef-sym 'pcomplete))))
;;;###autoload
(defun pcomplete-shell-setup ()