monnier pushed a commit to branch externals/auctex
in repository elpa.
commit 4cf101f116003598cdac7def205fbe0ce7ab5aca
Author: Tassilo Horn <[email protected]>
Date: Thu Dec 20 08:44:16 2012 +0000
* images/spell.xpm: New image, copied from Emacs.
* tex-bar.el (TeX-bar-TeX-button-alist): Use it for the spell
button.
---
ChangeLog | 7 ++++++
images/spell.xpm | 64 ++++++++++++++++++++++++++++++++++++++++++++++++++++++
tex-bar.el | 2 +-
3 files changed, 72 insertions(+), 1 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 831c49b..7e07d73 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,12 @@
2012-12-20 Tassilo Horn <[email protected]>
+ * images/spell.xpm: New image, copied from Emacs.
+
+ * tex-bar.el (TeX-bar-TeX-button-alist): Use it for the spell
+ button.
+
+2012-12-20 Tassilo Horn <[email protected]>
+
* tex-bar.el (TeX-bar-TeX-button-alist, TeX-bar-TeX-buttons): Add
`spell' button to run spell-checker.
diff --git a/images/spell.xpm b/images/spell.xpm
new file mode 100644
index 0000000..b53f451
--- /dev/null
+++ b/images/spell.xpm
@@ -0,0 +1,64 @@
+/* XPM */
+static char * spell_xpm[] = {
+"24 24 37 1",
+" c None",
+". c #000000",
+"+ c #8BBB8C",
+"@ c #ABD0AC",
+"# c #1A3B1A",
+"$ c #8ABA88",
+"% c #B4D5B4",
+"& c #70A770",
+"* c #132C13",
+"= c #77A676",
+"- c #2D2D2D",
+"; c #CBDFCB",
+"> c #6FAE6E",
+", c #A8CBA6",
+"' c #6D9D6C",
+") c #D0E4D0",
+"! c #6FAF6F",
+"~ c #587055",
+"{ c #B8D6B8",
+"] c #5B9159",
+"^ c #D4E4D4",
+"/ c #67AF67",
+"( c #5D905B",
+"_ c #9FC59D",
+": c #93BE92",
+"< c #B5D1B5",
+"[ c #67AF68",
+"} c #63A261",
+"| c #BBD6BA",
+"1 c #82B881",
+"2 c #75AF74",
+"3 c #6B8868",
+"4 c #9DC39D",
+"5 c #7DB17B",
+"6 c #6BA368",
+"7 c #485C46",
+"8 c #89BA88",
+" ",
+" ",
+" ",
+" ",
+" ... .... ... ",
+" .. . .. . .. . ",
+" .. . .... .. ",
+" ..... .. . .. ",
+" .. . .. . .. . . ",
+" .. . .... ... ... ",
+" .+. ",
+" .. .@# ",
+" .$. .%&. ",
+" *=. -;>. ",
+" .,'. .)!~. ",
+" .{].^/(. ",
+" ._:<[}~. ",
+" .|123. ",
+" .4567. ",
+" .83. ",
+" .37. ",
+" .. ",
+" ",
+" "};
diff --git a/tex-bar.el b/tex-bar.el
index fe89b50..d1740b5 100644
--- a/tex-bar.el
+++ b/tex-bar.el
@@ -198,7 +198,7 @@ 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 "view" ;; TODO: We probably want a custom icon.
+ (spell :image "spell"
:command (TeX-command "Spell" 'TeX-master-file -1)
:help (lambda (&rest ignored)
(TeX-bar-help-from-command-list "Spell"))))
