changeset 46769:8bb6a2e5d6bd

(pcomplete-comint-setup): Use `add-to-list', to prevent adding the symbol `pcomplete' to shell-dynamic-complete-functions too many times.
author John Wiegley <johnw@newartisans.com>
date Wed, 31 Jul 2002 23:32:14 +0000
parents f086b73cbf97
children 06873cff56e8
files lisp/pcomplete.el
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/pcomplete.el	Wed Jul 31 23:32:02 2002 +0000
+++ b/lisp/pcomplete.el	Wed Jul 31 23:32:14 2002 +0000
@@ -582,8 +582,7 @@
 		    (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 ()