view etc/toolbar/disk-xx.xpm @ 4728:d0ea57eb3de4

Don't error if handed a string and a non-string, #'equalp. tests/ChangeLog addition: 2009-11-01 Aidan Kehoe <kehoea@parhasard.net> * automated/lisp-tests.el: Check that (equal "hi there" [hi there]) gives nil, instead of erroring; fixes a bug Ben introduced in 2002. lisp/ChangeLog addition: 2009-11-01 Aidan Kehoe <kehoea@parhasard.net> * cl-extra.el (equalp): Don't error if handed a string and a non-string.
author Aidan Kehoe <kehoea@parhasard.net>
date Sun, 01 Nov 2009 15:05:46 +0000
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"};