summaryrefslogtreecommitdiff
path: root/lisp/ido.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2013-08-08 20:54:22 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2013-08-08 20:54:22 -0400
commitad9dcd70d619c92ba664c87eead897567b9f1691 (patch)
treeb5239fba0b89c409550a11152540b98f1e4f7657 /lisp/ido.el
parent241de2901eb3660565acbe5469e3179fce43e225 (diff)
downloademacs-ad9dcd70d619c92ba664c87eead897567b9f1691.tar.gz
* lisp/ido.el (ido-completion-help): Fix up compiler warning.
Diffstat (limited to 'lisp/ido.el')
-rw-r--r--lisp/ido.el11
1 files changed, 5 insertions, 6 deletions
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)))))))