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 |
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.") |