Mercurial > emacs

diff lisp/gnus/message.el @ 44344:37801f2191c3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* gnus-group.el (gnus-group-make-tool-bar): Load tool-bar first. * message.el (message-tool-bar-map): Ditto. * gnus-sum.el (gnus-summary-make-tool-bar): Ditto.
author ShengHuo ZHU <zsh@cs.rochester.edu>
date Tue, 02 Apr 2002 20:24:32 +0000
parents 7782e54757bb
children cdc6e9b808d6
line wrap: on
line diff
--- a/lisp/gnus/message.el	Tue Apr 02 19:37:29 2002 +0000
+++ b/lisp/gnus/message.el	Tue Apr 02 20:24:32 2002 +0000
@@ -4491,8 +4491,10 @@
 (eval-when-compile (defvar tool-bar-map))
 (if (featurep 'xemacs)
     (require 'messagexmas)
-  (when (and (fboundp 'tool-bar-add-item-from-menu)
- 	     tool-bar-mode)
+  (when (and 
+	 (condition-case nil (require 'tool-bar) (error nil))
+	 (fboundp 'tool-bar-add-item-from-menu)
+	 tool-bar-mode)
     (defvar message-tool-bar-map
       (let ((tool-bar-map (copy-keymap tool-bar-map)))
  	;; Zap some items which aren't so relevant and take up space.