annotate etc/custom/check1.xpm @ 5268:09f8ed0933c7

Avoid byte compiler warnings, some needless consing, descr-text.el lisp/ChangeLog addition: 2010-09-16 Aidan Kehoe <kehoea@parhasard.net> * descr-text.el (unidata-initialize-unicodedata-database) (unidata-initialize-unihan-database, describe-char-unicode-data) (describe-char-unicode-data): Wrap calls to the database functions with (with-fboundp ...), avoiding byte compile warnings on builds without support for the database functions. (describe-char): (reduce #'max ...), not (apply #'max ...), no need to cons needlessly. (describe-char): Remove a redundant lambda wrapping #'extent-properties. (describe-char-unicode-data): Call #'nsubst when replacing "" with nil in the result of #'split-string, instead of consing inside mapcar.
author Aidan Kehoe <kehoea@parhasard.net>
date Thu, 16 Sep 2010 15:24:40 +0100
parents 8fc7fe29b841
children 7910031dd78a
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
22
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
1 /* XPM */
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
2 static char * check1_xpm[] = {
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
3 "11 11 3 1",
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
4 " c #737373737373",
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
5 ". c #E6E6E6E6E6E6",
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
6 "X c #22228B8B2222",
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
7 " ",
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
8 " .",
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
9 " XXXXXXX..",
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
10 " XXXXXXX..",
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
11 " XXXXXXX..",
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
12 " XXXXXXX..",
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
13 " XXXXXXX..",
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
14 " XXXXXXX..",
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
15 " XXXXXXX..",
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
16 " .........",
8fc7fe29b841 Import from CVS: tag r19-15b94
cvs
parents:
diff changeset
17 " .........."};