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 mailing list [EMAIL PROTECTED] http://lists.gnu.org/mailman/listinfo/auctex-diffs
