summaryrefslogtreecommitdiff
path: root/lisp/complete.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/complete.el')
-rw-r--r--lisp/complete.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/complete.el b/lisp/complete.el
index df1bc2bfd8b..ca6231893c3 100644
--- a/lisp/complete.el
+++ b/lisp/complete.el
@@ -234,7 +234,9 @@ second TAB brings up the `*Completions*' buffer."
(funcall
(if partial-completion-mode 'add-hook 'remove-hook)
'choose-completion-string-functions
- (lambda (&rest x) (goto-char (point-max)) nil))
+ (lambda (choice buffer mini-p base-size)
+ (if mini-p (goto-char (point-max)))
+ nil))
;; Build the env-completion and mapping table.
(when (and partial-completion-mode (null PC-env-vars-alist))
(setq PC-env-vars-alist