(gnus-check-reasonable-setup): Use fboundp instead of boundp to check if

 display-warning is available.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 323aac6..f5ed474 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2004-10-27  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * gnus-start.el (gnus-check-reasonable-setup): Use fboundp instead
+       of boundp to check if display-warning is available.
+
 2004-10-26  Teodor Zlatanov  <tzz@lifelogs.com>
 
        * nnimap.el (nnimap-open-connection): fixed prog1/prog2 bug

diff --git a/lisp/gnus-start.el b/lisp/gnus-start.el
index f213789..99bf877 100644 (file)
--- a/lisp/gnus-start.el
+++ b/lisp/gnus-start.el
@@ -3109,7 +3109,7 @@ Would otherwise be an alias for `display-time-event-handler'." nil))))
 (defun gnus-check-reasonable-setup ()
   ;; Check whether nnml and nnfolder share a directory.
   (let ((display-warn
-        (if (boundp 'display-warning)
+        (if (fboundp 'display-warning)
             'display-warning
           (lambda (type message)
             (if noninteractive