[elpa] 02/299: * images/spell.xpm: New image, copied from Emacs.

[Stefan Monnier]

monnier pushed a commit to branch externals/auctex
in repository elpa.

commit 4cf101f116003598cdac7def205fbe0ce7ab5aca
Author: Tassilo Horn <address@hidden>
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  <address@hidden>
 
+       * 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  <address@hidden>
+
        * 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",
+"                        ",
+"                        ",
+"                        ",
+"                        ",
+"  ...  ....   ...       ",
+" ..  . ..  . ..  .      ",
+" ..  . ....  ..         ",
+" ..... ..  . ..         ",
+" ..  . ..  . ..  .   .  ",
+" ..  . ....   ...   ... ",
+"                   .+.  ",
+"         ..       address@hidden   ",
+"         .$.     .%&.   ",
+"          *=.   -;>.    ",
+"          .,'. .)!~.    ",
+"           .{].^/(.     ",
+"           ._:<[}~.     ",
+"            .|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"))))