diff options
Diffstat (limited to 'lisp/erc/erc-pcomplete.el')
| -rw-r--r-- | lisp/erc/erc-pcomplete.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/erc/erc-pcomplete.el b/lisp/erc/erc-pcomplete.el index 410a3c6d04c..67eb381e75f 100644 --- a/lisp/erc/erc-pcomplete.el +++ b/lisp/erc/erc-pcomplete.el @@ -82,10 +82,8 @@ for use on `completion-at-point-function'." "Complete the nick before point." (interactive) (when (> (point) (erc-beg-of-input-line)) - (let ((last-command (if (eq last-command 'erc-complete-word) - 'pcomplete - last-command))) - (call-interactively 'pcomplete)) + (setq this-command 'pcomplete) + (call-interactively 'pcomplete) t)) ;;; Setup function |