/[emacs]/emacs/lisp/toolbar/tool-bar.el
ViewVC logotype

Diff of /emacs/lisp/toolbar/tool-bar.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.24 by abraham, Mon Feb 11 16:47:55 2002 UTC revision 1.25 by abraham, Tue Feb 19 10:30:30 2002 UTC
# Line 47  With numeric ARG, display the tool bar i Line 47  With numeric ARG, display the tool bar i
47    
48  See `tool-bar-add-item' and `tool-bar-add-item-from-menu' for  See `tool-bar-add-item' and `tool-bar-add-item-from-menu' for
49  conveniently adding tool bar items."  conveniently adding tool bar items."
50      :init-value t
51    :global t    :global t
52    :group 'mouse    :group 'mouse
53    :group 'frames    :group 'frames
# Line 67  conveniently adding tool bar items." Line 68  conveniently adding tool bar items."
68                  (= 1 (length (default-value 'tool-bar-map)))) ; not yet setup                  (= 1 (length (default-value 'tool-bar-map)))) ; not yet setup
69             (tool-bar-setup))))             (tool-bar-setup))))
70    
 ;;; `tool-bar-mode' doesn't really have a standard value, as it depend  
 ;;; on where and how Emacs was started.  By removing the standard  
 ;;; value, we ensure that customize will always save it.  
 ;; -- Per Abrahamsen <abraham@dina.kvl.dk> 2002-02-11.  
 (put 'tool-bar-mode 'standard-value nil)  
   
71  (defvar tool-bar-map (make-sparse-keymap)  (defvar tool-bar-map (make-sparse-keymap)
72    "Keymap for the tool bar.    "Keymap for the tool bar.
73  Define this locally to override the global tool bar.")  Define this locally to override the global tool bar.")

Legend:
Removed from v.1.24  
changed lines
  Added in v.1.25

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26