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 * radio1_xpm[] = {
"12 11 4 1",
" 	c #FFFFFFFFFFFF s background",
".	c #737373737373",
"X	c #22228B8B2222",
"o	c #E6E6E6E6E6E6",
"     ..     ",
"    ....    ",
"   ..XX..   ",
"  ..XXXX..  ",
" ..XXXXXX.. ",
"ooXXXXXXXXoo",
" ooXXXXXXoo ",
"  ooXXXXoo  ",
"   ooXXoo   ",
"    oooo    ",
"     oo     "};