From: Lars Magne Ingebrigtsen Date: Thu, 17 Mar 2011 19:04:11 +0000 (+0100) Subject: Bind help-echo-owns-message to avoid a compiler warning on XEmacs. X-Git-Url: http://cgit.sxemacs.org/?p=gnus;a=commitdiff_plain;h=302ab3d869fb144f6eb03efbdf1604caac8d2b10 Bind help-echo-owns-message to avoid a compiler warning on XEmacs. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e2cde440a..eb488b813 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2011-03-17 Lars Magne Ingebrigtsen + * dgnushack.el: Bind help-echo-owns-message to avoid a compiler warning + on XEmacs. + * gnus-art.el: Require mouse, which the build bot seems to say is needed. diff --git a/lisp/dgnushack.el b/lisp/dgnushack.el index 9fa42d34f..a8783cd19 100644 --- a/lisp/dgnushack.el +++ b/lisp/dgnushack.el @@ -137,14 +137,16 @@ (autoload 'iswitchb-read-buffer "iswitchb") (autoload 'netrc-credentials "netrc") (defalias 'x-defined-colors 'ignore) - (unless (fboundp 'url-retrieve-synchronously) - (defalias 'url-retrieve-synchronously 'url-retrieve)) (defalias 'read-color 'ignore))) (eval-and-compile (when (featurep 'xemacs) (unless (fboundp 'defadvice) (autoload 'defadvice "advice" nil nil 'macro)) + (unless (boundp 'help-echo-owns-message) + (defvar help-echo-owns-message)) + (unless (fboundp 'url-retrieve-synchronously) + (defalias 'url-retrieve-synchronously 'url-retrieve)) (autoload 'Info-directory "info" nil t) (autoload 'Info-index "info" nil t) (autoload 'Info-index-next "info" nil t)