[Bug-AUCTeX] 11.83; AUCTeX toolbar

[Nick Roberts]

Load AUCTeX is e.g by visiting a LaTeX file.  Turn tool-bar-mode on, then off
and on again.  Then every buffer has AucTeX buttons in its toolbar and all
local icons/buttons are overwritten.  If I load AUCTeX by visiting a LaTeX file
and then switch buffer before turning on tool-bar-mode then that buffer has
AucTeX buttons and that of the LaTeX file doesn't!

I only have byte compiled lisp for AucTeX but the problem seems to be with
tool-bar-mode-on-hook which is set to LaTeX-maybe-install-toolbar.  This
seems to be an AucTeX variable (in which case it shouldn't pollute the
tool-bar- namespace) and it interferes with the local values of tool-bar-map.

Why not just do `something like':

 (if some-AucTeX-variable
   (set (make-local-variable 'tool-bar-map) LaTeX-tool-bar-map))

in LaTeX mode?

Emacs  : GNU Emacs 22.0.90.10 (i686-pc-linux-gnu, X toolkit, Xaw3d scroll bars)
 of 2006-11-09 on kahikatea.snap.net.nz
Package: 11.83

current state:
==============
(setq
 AUCTeX-date "2006-06-07"
 window-system 'x
 LaTeX-version "2e"
 TeX-style-path '("style" "auto" "/home/olt/roberts/style/" "~/auto/"
                  "/usr/share/emacs/site-lisp/auctex/style" "/var/auctex")
 TeX-auto-save t
 TeX-parse-self t
 TeX-master t
 TeX-command-list '(("TeX" "%(PDF)%(tex) %S%(PDFout) \"%(mode)\\input %t\""
                     TeX-run-TeX nil
                     (plain-tex-mode ams-tex-mode texinfo-mode) :help
                     "Run plain TeX")
                    ("LaTeX" "%l \"%(mode)\\input{%t}\"" TeX-run-TeX nil
                     (latex-mode doctex-mode) :help "Run LaTeX")
                    ("Makeinfo" "makeinfo %t" TeX-run-compile nil
                     (texinfo-mode) :help "Run Makeinfo with Info output")
                    ("Makeinfo HTML" "makeinfo --html %t" TeX-run-compile nil
                     (texinfo-mode) :help "Run Makeinfo with HTML output")
                    ("AmSTeX" "%(PDF)amstex %S%(PDFout) \"%(mode)\\input %t\""
                     TeX-run-TeX nil (ams-tex-mode) :help "Run AMSTeX")
                    ("ConTeXt" "texexec --once --texutil %(execopts)%t"
                     TeX-run-TeX nil (context-mode) :help "Run ConTeXt once")
                    ("ConTeXt Full" "texexec %(execopts)%t" TeX-run-TeX nil
                     (context-mode) :help "Run ConTeXt until completion")
                    ("BibTeX" "bibtex %s" TeX-run-BibTeX nil t :help
                     "Run BibTeX")
                    ("View" "%V" TeX-run-discard t t :help "Run Viewer")
                    ("Print" "%p" TeX-run-command t t :help "Print the file")
                    ("Queue" "%q" TeX-run-background nil t :help
                     "View the printer queue" :visible TeX-queue-command)
                    ("File" "%(o?)dvips %d -o %f " TeX-run-command t t :help
                     "Generate PostScript file")
                    ("Index" "makeindex %s" TeX-run-command nil t :help
                     "Create index file")
                    ("Check" "lacheck %s" TeX-run-compile nil (latex-mode)
                     :help "Check LaTeX file for correctness")
                    ("Spell" "(TeX-ispell-document \"\")" TeX-run-function nil
                     t :help "Spell-check the document")
                    ("Clean" "TeX-clean" TeX-run-function nil t :help
                     "Delete generated intermediate files")
                    ("Clean All" "(TeX-clean t)" TeX-run-function nil t :help
                     "Delete generated intermediate and output files")
                    ("Other" "" TeX-run-command t t :help
                     "Run an arbitrary command")
                    )
 )

-- 
Nick                                           http://www.inet.net.nz/~nickrob