summaryrefslogtreecommitdiff
path: root/lisp/pcomplete.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/pcomplete.el')
-rw-r--r--lisp/pcomplete.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/pcomplete.el b/lisp/pcomplete.el
index a744165e0d5..a24df93a828 100644
--- a/lisp/pcomplete.el
+++ b/lisp/pcomplete.el
@@ -738,12 +738,12 @@ user actually typed in."
COMPLETEF-SYM should be the symbol where the
dynamic-complete-functions are kept. For comint mode itself,
this is `comint-dynamic-complete-functions'."
- (set (make-local-variable 'pcomplete-parse-arguments-function)
- #'pcomplete-parse-comint-arguments)
+ (setq-local pcomplete-parse-arguments-function
+ #'pcomplete-parse-comint-arguments)
(add-hook 'completion-at-point-functions
#'pcomplete-completions-at-point nil 'local)
- (set (make-local-variable completef-sym)
- (copy-sequence (symbol-value completef-sym)))
+ (setq-local ompletef-sym
+ (copy-sequence (symbol-value completef-sym)))
(let* ((funs (symbol-value completef-sym))
(elem (or (memq 'comint-filename-completion funs)
(memq 'shell-filename-completion funs)