Mercurial > hg > xemacs-beta
view etc/toolbar/workshop-cap-up.xpm @ 5400:aa78b0b0b289
Add various Common Lisp character functions, making porting CL code easier.
2011-04-17 Aidan Kehoe <kehoea@parhasard.net>
* cl-extra.el:
* cl-extra.el ('char<): New.
* cl-extra.el ('char>=): New.
* cl-extra.el ('char>): New.
* cl-extra.el ('char<=): New.
* cl-extra.el (alpha-char-p): New.
* cl-extra.el (graphic-char-p): New.
* cl-extra.el (standard-char-p): New.
* cl-extra.el (char-name): New.
* cl-extra.el (name-char): New.
* cl-extra.el (upper-case-p): New.
* cl-extra.el (lower-case-p): New.
* cl-extra.el (both-case-p): New.
* cl-extra.el (char-upcase): New.
* cl-extra.el (char-downcase): New.
* cl-extra.el (integer-length): New.
Add various functions dealing (mainly) with characters, making
some Common Lisp code easier to port.
* descr-text.el (describe-char-unicode-data):
Add an autoload for this function, used by #'char-name.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Sun, 17 Apr 2011 11:14:38 +0100 (2011-04-17) |
| parents | 3ecd8885ac67 |
| children | 7910031dd78a |
line wrap: on
line source
/* XPM */ static char * xemacs-cap-workshop_xpm[] = { "33 33 9 1", " c #BDBDBDBDBDBD s backgroundToolBarColor", "F c #000000000000 s foregroundToolBarColor", ". c #ADADADADADAD", "X c #000000000000", "o c #333333333333", "O c #424242424242", "+ c #949494949494", "@ c #7F7F7F7F7F7F", "# c #636363636363", " ", " ", " ", " .... ..... .. ", " .XXXX ..XXXo OX. ", " +XXo.. @XXO @@. ", " XXX. .XXX O.. ", " OXX+ @XXX O. ", " @XXo. o@XXO.@@. XXX. . ", " XXX..@ XXX.o.@X.. oX@ ", " OXX@O oXX@O.X@.. .X@ ", " .XXXO +XXX@+XO. @@ ", " XXX XXX @XXO ", " OXX OXO XXXX@ ", " .X# @X@ @XXXXX@ ", " X X .XXXXX@ ", " .@XXXX ", " @ .OXX ", " @#. XX ", " @X X ", " @oo@..X@ ", " ..XXX ", " ", " ", " F F ", " F F F F FF F ", " F F F F F F FFF FF FFF ", " F F F F F FF F F F F F F ", " F F F FF F F F F F F F ", " F F F F F F F F F F F ", " F F F F FF F F FF FFF ", " F ", " "};