From ad9dcd70d619c92ba664c87eead897567b9f1691 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Thu, 8 Aug 2013 20:54:22 -0400 Subject: [PATCH] * lisp/ido.el (ido-completion-help): Fix up compiler warning. --- lisp/ChangeLog | 4 ++++ lisp/ido.el | 11 +++++------ 2 files changed, 9 insertions(+), 6 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 382c5804330..46e8f62f19b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2013-08-09 Stefan Monnier + + * ido.el (ido-completion-help): Fix up compiler warning. + 2013-08-09 Juanma Barranquero * frameset.el (frameset-p): Add autoload cookie. diff --git a/lisp/ido.el b/lisp/ido.el index 5d017069c5e..39ad3137bc9 100644 --- a/lisp/ido.el +++ b/lisp/ido.el @@ -3972,12 +3972,11 @@ If `ido-change-word-sub' cannot be found in WORD, return nil." (if (featurep 'xemacs) ;; XEmacs extents are put on by default, doesn't seem to be ;; any way of switching them off. - ;; This obscure code avoids a byte compiler warning in Emacs. - (let ((f 'display-completion-list)) - (funcall f completion-list - :help-string "ido " - :activate-callback - (lambda (x y z) (message "Doesn't work yet, sorry!")))) + (display-completion-list + completion-list + :help-string "ido " + :activate-callback + (lambda (&rest _) (message "Doesn't work yet, sorry!"))) ;; else running Emacs ;;(add-hook 'completion-setup-hook 'completion-setup-function) (display-completion-list completion-list)))))))