[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/gnus/gnus-group.el
From: |
ShengHuo ZHU |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/gnus/gnus-group.el |
Date: |
Tue, 02 Apr 2002 15:24:33 -0500 |
Index: emacs/lisp/gnus/gnus-group.el
diff -c emacs/lisp/gnus/gnus-group.el:1.18 emacs/lisp/gnus/gnus-group.el:1.19
*** emacs/lisp/gnus/gnus-group.el:1.18 Tue Dec 4 14:28:25 2001
--- emacs/lisp/gnus/gnus-group.el Tue Apr 2 15:24:32 2002
***************
*** 822,830 ****
;; Emacs 21 tool bar. Should be no-op otherwise.
(defun gnus-group-make-tool-bar ()
! (if (and (fboundp 'tool-bar-add-item-from-menu)
! (default-value 'tool-bar-mode)
! (not gnus-group-toolbar-map))
(setq gnus-group-toolbar-map
(let ((tool-bar-map (make-sparse-keymap)))
(tool-bar-add-item-from-menu
--- 822,832 ----
;; Emacs 21 tool bar. Should be no-op otherwise.
(defun gnus-group-make-tool-bar ()
! (if (and
! (condition-case nil (require 'tool-bar) (error nil))
! (fboundp 'tool-bar-add-item-from-menu)
! (default-value 'tool-bar-mode)
! (not gnus-group-toolbar-map))
(setq gnus-group-toolbar-map
(let ((tool-bar-map (make-sparse-keymap)))
(tool-bar-add-item-from-menu
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/gnus/gnus-group.el,
ShengHuo ZHU <=