diff options
| author | Stefan Kangas | 2020-12-09 22:40:31 +0100 |
|---|---|---|
| committer | Stefan Kangas | 2020-12-09 22:48:59 +0100 |
| commit | ddf55400dc70a394ecb0547f588f08c95ab8541a (patch) | |
| tree | ff4e75f8ad1e45661e021118d07c191e9f9285ab | |
| parent | 1047f80f1c609aa1ce47bf9b294240fb9adf4b24 (diff) | |
| download | emacs-ddf55400dc70a394ecb0547f588f08c95ab8541a.tar.gz emacs-ddf55400dc70a394ecb0547f588f08c95ab8541a.zip | |
Fix thinko in my previous commit
* lisp/pcomplete.el (pcomplete-comint-setup): Fix thinko in my
previous commit. This was not a quoted symbol but a variable, and
therefore cannot use setq-local.
| -rw-r--r-- | lisp/pcomplete.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/pcomplete.el b/lisp/pcomplete.el index 4b31d157f67..1f3327435e2 100644 --- a/lisp/pcomplete.el +++ b/lisp/pcomplete.el | |||
| @@ -742,8 +742,8 @@ this is `comint-dynamic-complete-functions'." | |||
| 742 | #'pcomplete-parse-comint-arguments) | 742 | #'pcomplete-parse-comint-arguments) |
| 743 | (add-hook 'completion-at-point-functions | 743 | (add-hook 'completion-at-point-functions |
| 744 | #'pcomplete-completions-at-point nil 'local) | 744 | #'pcomplete-completions-at-point nil 'local) |
| 745 | (setq-local completef-sym | 745 | (set (make-local-variable completef-sym) |
| 746 | (copy-sequence (symbol-value completef-sym))) | 746 | (copy-sequence (symbol-value completef-sym))) |
| 747 | (let* ((funs (symbol-value completef-sym)) | 747 | (let* ((funs (symbol-value completef-sym)) |
| 748 | (elem (or (memq 'comint-filename-completion funs) | 748 | (elem (or (memq 'comint-filename-completion funs) |
| 749 | (memq 'shell-filename-completion funs) | 749 | (memq 'shell-filename-completion funs) |