diff options
| author | Jan Djärv <jan.h.d@swipnet.se> | 2010-11-21 19:29:08 +0100 |
|---|---|---|
| committer | Jan Djärv <jan.h.d@swipnet.se> | 2010-11-21 19:29:08 +0100 |
| commit | 77af54d7c2d9e1ebcbbe1dffec4004b7079ce6bf (patch) | |
| tree | 999dda997d7c8fa1d4372381c3380ff11701676b /lisp/tool-bar.el | |
| parent | 4e2f7d2a68a1849a1b8ef5488afbd2c0dadd1e80 (diff) | |
| download | emacs-77af54d7c2d9e1ebcbbe1dffec4004b7079ce6bf.tar.gz | |
* tool-bar.el (tool-bar-setup): Remove save as, print and customize.
Diffstat (limited to 'lisp/tool-bar.el')
| -rw-r--r-- | lisp/tool-bar.el | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/lisp/tool-bar.el b/lisp/tool-bar.el index 4b6fd970d8a..a3292c42046 100644 --- a/lisp/tool-bar.el +++ b/lisp/tool-bar.el @@ -271,11 +271,6 @@ holds a keymap." (not (eq 'special (get major-mode 'mode-class))))) - (tool-bar-add-item-from-menu 'write-file "saveas" nil :vert-only t - :visible '(or buffer-file-name - (not (eq 'special - (get major-mode - 'mode-class))))) (tool-bar-add-item-from-menu 'undo "undo" nil :vert-only t :visible '(not (eq 'special (get major-mode 'mode-class)))) @@ -297,16 +292,12 @@ holds a keymap." ;; than a lambda for Read Mail. ;;(tool-bar-add-item-from-menu 'compose-mail "mail/compose") - (tool-bar-add-item-from-menu 'print-buffer "print" nil :label "Print") ;; tool-bar-add-item-from-menu itself operates on ;; (default-value 'tool-bar-map), but when we don't use that function, ;; we must explicitly operate on the default value. (let ((tool-bar-map (default-value 'tool-bar-map))) - (tool-bar-add-item "preferences" 'customize 'customize - :help "Edit preferences (customize)") - (tool-bar-add-item "help" (lambda () (interactive) (popup-menu menu-bar-help-menu)) |