view etc/toolbar/disk-xx.xpm @ 5264:0d43872986b6

Change (apply 'nconc (mapcar ...)) to (mapcan ...); warn about first form. lisp/ChangeLog addition: 2010-09-16 Aidan Kehoe <kehoea@parhasard.net> * byte-optimize.el (byte-optimize-apply): Transform (apply 'nconc (mapcar ...)) to (mapcan ...); warn about use of the first idiom. * update-elc.el (do-autoload-commands): * packages.el (packages-find-package-library-path): * frame.el (frame-list): * extents.el (extent-descendants): * etags.el (buffer-tag-table-files): * dumped-lisp.el (preloaded-file-list): * device.el (device-list): * bytecomp-runtime.el (proclaim-inline, proclaim-notinline) Use #'mapcan, not (apply #'nconc (mapcar ...) in all these files. * bytecomp-runtime.el (eval-when-compile, eval-and-compile): In passing, mention that these macros also evaluate the body when interpreted.
author Aidan Kehoe <kehoea@parhasard.net>
date Thu, 16 Sep 2010 13:51:49 +0100
parents 376386a54a3c
children 7910031dd78a
line wrap: on
line source

/* XPM */
static char * disk[] = {
"28 28 5 1",
"X	c Gray75 s backgroundToolBarColor",
"o	c Gray60",
"O	c Gray60",
"+	c Gray90",
"@	c Gray40",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX",
"XXXXXooooooooooooooooooXXXXX",
"XXXXXoOOo++++++++++oOOoXXXXX",
"XXXXXoOOo++++++++++oOOoXXXXX",
"XXXXXoOOo++++++++++oOooXXXXX",
"XXXXXoOOo++++++++++oOOoXXXXX",
"XXXXXoOOo++++++++++oOOoXXXXX",
"XXXXXoOOo++++++++++oOOoXXXXX",
"XXXXXoOOo++++++++++oOOoXXXXX",
"XXXXXoOOo++++++++++oOOoXXXXX",
"XXXXXoOOooooooooooooOOoXXXXX",
"XXXXXoOOOOOOOOOOOOOOOOoXXXXX",
"XXXXXoOOOOOOOOOOOOOOOOoXXXXX",
"XXXXXoOOooooooooooooOOoXXXXX",
"XXXXXoOOo@@@@@@@o++oOOoXXXXX",
"XXXXXoOOo@@@@@@@o++oOOoXXXXX",
"XXXXXoOOo@@@@@@@o++oOOoXXXXX",
"XXXXXXoOo@@@@@@@o++oOOoXXXXX",
"XXXXXXXooooooooooooooooXXXXX",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX"};