monnier pushed a commit to branch externals/auctex
in repository elpa.
commit de382e28c63c4a0b1aa3156296ba7675825bcbf7
Author: Tassilo Horn <[email protected]>
Date: Thu Dec 20 08:51:42 2012 +0000
* tex-bar.el (TeX-bar-LaTeX-buttons, TeX-bar-LaTeX-button-alist):
Also add spell button.
---
ChangeLog | 3 +++
tex-bar.el | 7 ++++++-
2 files changed, 9 insertions(+), 1 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 7e07d73..54166b5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
2012-12-20 Tassilo Horn <[email protected]>
+ * tex-bar.el (TeX-bar-LaTeX-buttons, TeX-bar-LaTeX-button-alist):
+ Also add spell button.
+
* images/spell.xpm: New image, copied from Emacs.
* tex-bar.el (TeX-bar-TeX-button-alist): Use it for the spell
diff --git a/tex-bar.el b/tex-bar.el
index d1740b5..32ed5ee 100644
--- a/tex-bar.el
+++ b/tex-bar.el
@@ -231,7 +231,7 @@ format of the argument MEANING-ALIST in the mentioned
function."
(defcustom TeX-bar-LaTeX-buttons
'(new-file open-file dired kill-buffer save-buffer cut copy paste undo
- [separator nil] latex next-error view bibtex)
+ [separator nil] latex next-error view bibtex spell)
"List of buttons available in `latex-mode'.
It should be a list in the same format of the BUTTONS parameter
in function `toolbarx-install-toolbar', often a symbol that
@@ -262,6 +262,7 @@ alists, see variable `TeX-bar-LaTeX-all-button-alists'."
(const file)
(const bibtex)
(const clean)
+ (const spell)
(const latex-symbols-experimental))
(repeat (choice (symbol :tag "Label")
(vector :args ((symbol :tag "Label in Emacs ")
@@ -344,6 +345,10 @@ the argument BUTTON-ALIST in function
`toolbarx-install-toolbar'."
:command (TeX-command "Clean" 'TeX-master-file -1)
:help (lambda (&rest ignored)
(TeX-bar-help-from-command-list "Clean")))
+ (spell :image "spell"
+ :command (TeX-command "Spell" 'TeX-master-file -1)
+ :help (lambda (&rest ignored)
+ (TeX-bar-help-from-command-list "Spell")))
(latex-symbols-experimental . (:alias :eval-group
LaTeX-symbols-toolbar-switch-contents
LaTeX-symbols-toolbar-contents)))
