Changed xemacs specific code to avoid byte compiler warning in GNU

emacs.

diff --git a/lisp/ido.el b/lisp/ido.el
index 9c1c353242e68318eea29c70d2452a2ad52358bb..446a1239a9f967e091e7f295b24f41df74a21a08 100644 (file)
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -2871,10 +2871,12 @@ for first matching file."
            (if ido-xemacs 
                ;; XEmacs extents are put on by default, doesn't seem to be
                ;; any way of switching them off.
-               (display-completion-list completion-list
-                                        :help-string "ido "
-                                        :activate-callback 
-                                        '(lambda (x y z) (message "doesn't work yet, sorry!")))
+               ;; This obscure code avoids a byte compiler warning in GNU 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!"))))
              ;; else running Emacs
              ;;(add-hook 'completion-setup-hook 'completion-setup-function)
              (display-completion-list completion-list)))))))