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.

/* XPM */
static char *option[] = {
/* width height num_colors chars_per_pixel */
"    17    17        4            1",
/* colors */
". c #000000",
"a c #a8b038",
"b c #f8f800",
"c s None c None",
/* pixels */
"ccccccccccccccccc",
"ccccccccccccccccc",
"cccccbbbbbbcccccc",
"ccccbbbbbbbbccccc",
"cccbbbaaaabbbcccc",
"ccbbbaaaaaabbbccc",
"cbbbaabbbaabbbbcc",
"cbbbaababaabbbbcc",
"cbbbbbbbaabbbbbcc",
"cbbbbbbaabbbbbbcc",
"cbbbbbbaabbbbbbcc",
"cbbbbbbbbbbbbbbcc",
"ccbbbbbaabbbbbccc",
"cccbbbbaabbbbcccc",
"ccccbbbbbbbbccccc",
"cccccbbbbbbcccccc",
"ccccccccccccccccc"
};