diff options
author | Madhu <enometh@net.meer> | 2021-08-19 18:01:06 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-08-19 18:02:07 +0200 |
commit | bfa3191c79df5a5e500a11ec8fab505c3b1cb2f3 (patch) | |
tree | 909fec73fb080e1b2ff32d8667922de9001ad915 | |
parent | 489ddc56ab761f2c7308db42bea7fc74ae4bead0 (diff) | |
download | emacs-bfa3191c79df5a5e500a11ec8fab505c3b1cb2f3.tar.gz |
Correctly call completion-in-region in shell.el
* lisp/shell.el (shell-dynamic-complete-command)
(shell-dynamic-complete-environment-variable): Correctly call
completion-in-region (bug#50125).
Copyright-paperwork-exempt: yes
-rw-r--r-- | lisp/shell.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/shell.el b/lisp/shell.el index 292f267d2e1..5cdc0385a6f 100644 --- a/lisp/shell.el +++ b/lisp/shell.el @@ -1199,7 +1199,7 @@ Returns t if successful." (if data (prog2 (unless (window-minibuffer-p) (message "Completing command name...")) - (apply #'completion-in-region data))))) + (completion-in-region (nth 0 data) (nth 1 data) (nth 2 data)))))) (defun shell-command-completion () "Return the completion data for the command at point, if any." @@ -1314,7 +1314,7 @@ Returns non-nil if successful." (if data (prog2 (unless (window-minibuffer-p) (message "Completing variable name...")) - (apply #'completion-in-region data))))) + (completion-in-region (nth 0 data) (nth 1 data) (nth 2 data)))))) (defun shell-environment-variable-completion () |