(message-tool-bar-gnome): Check if `flyspell-mode' is

bound.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6bb7eb8..30fc8b9 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2006-04-04  Reiner Steib  <Reiner.Steib@gmx.de>
+
+       * message.el (message-tool-bar-gnome): Check if `flyspell-mode' is
+       bound.
+
 2006-04-04  Daiki Ueno  <ueno@unixuser.org>
 
        * pgg-gpg.el: Clean up process buffers every time gpg processes

diff --git a/lisp/message.el b/lisp/message.el
index e732d71..d2c15cd 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -6741,8 +6741,12 @@ Pre-defined symbols include `message-tool-bar-gnome' and
   :group 'message)
 
 (defcustom message-tool-bar-gnome
-  '((ispell-message "spell" nil :visible (not flyspell-mode))
-    (flyspell-buffer "spell" t :visible flyspell-mode
+  '((ispell-message "spell" nil
+                   :visible (or (not (boundp 'flyspell-mode))
+                                (not flyspell-mode)))
+    (flyspell-buffer "spell" t
+                    :visible (and (boundp 'flyspell-mode)
+                                  flyspell-mode)
                     :help "Flyspell whole buffer")
     (gmm-ignore "separator")
     (message-send-and-exit "mail/send")