[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[AUCTeX-diffs] Changes to auctex/tex.el,v
From: |
Reiner Steib |
Subject: |
[AUCTeX-diffs] Changes to auctex/tex.el,v |
Date: |
Thu, 27 Jul 2006 18:41:42 +0000 |
CVSROOT: /sources/auctex
Module name: auctex
Changes by: Reiner Steib <rsteib> 06/07/27 18:41:42
Index: tex.el
===================================================================
RCS file: /sources/auctex/auctex/tex.el,v
retrieving revision 5.583
retrieving revision 5.584
diff -u -b -r5.583 -r5.584
--- tex.el 11 Jul 2006 21:20:05 -0000 5.583
+++ tex.el 27 Jul 2006 18:41:42 -0000 5.584
@@ -1859,6 +1859,18 @@
(defvar TeX-grcl "}" "The TeX group closing character.")
(make-variable-buffer-local 'TeX-grcl)
+(defcustom TeX-enable-toolbar t
+ "Enable TeX tool bar."
+ :group 'TeX-tool-bar
+ :type 'boolean)
+
+(defun TeX-maybe-install-toolbar ()
+ "Conditionally install tool bar buttons for TeX mode.
+Install tool bar if `TeX-enable-toolbar' is non-nil."
+ (when TeX-enable-toolbar
+ ;; Defined in `tex-bar.el':
+ (TeX-install-toolbar)))
+
;;; Symbols
;; Must be before keymaps.
@@ -2432,6 +2444,9 @@
(setq TeX-base-mode-name "TeX")
(setq TeX-command-default "TeX")
(setq TeX-sentinel-default-function 'TeX-TeX-sentinel)
+ (add-hook 'tool-bar-mode-on-hook 'TeX-maybe-install-toolbar nil t)
+ (when (if (featurep 'xemacs) (featurep 'toolbar) tool-bar-mode)
+ (TeX-maybe-install-toolbar))
(TeX-run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'plain-TeX-mode-hook)
(TeX-set-mode-name))
- [AUCTeX-diffs] Changes to auctex/tex.el,v, Ralf Angeli, 2006/07/02
- [AUCTeX-diffs] Changes to auctex/tex.el,v, Ralf Angeli, 2006/07/07
- [AUCTeX-diffs] Changes to auctex/tex.el,v, Ralf Angeli, 2006/07/10
- [AUCTeX-diffs] Changes to auctex/tex.el,v, Ralf Angeli, 2006/07/11
- [AUCTeX-diffs] Changes to auctex/tex.el,v,
Reiner Steib <=