annotate etc/toolbar/disk-cap-up.xpm @ 5070:b0f4adffca7d

fix so that CL docstrings (with &key, etc.) handled properly -------------------- ChangeLog entries follow: -------------------- lisp/ChangeLog addition: 2010-02-23 Ben Wing <ben@xemacs.org> * autoload.el: * autoload.el (make-autoload): * cl-macs.el (cl-function-arglist): * cl-macs.el (cl-transform-lambda): Don't add argument list with the tag "Common Lisp lambda list:"; instead add in "standard" form using "arguments:" and omitting the function name. Add an arg to `cl-function-arglist' to omit the name and use it in autoload.el instead of just hacking it off. * help.el: * help.el (function-arglist): * help.el (function-documentation-1): New. Extract out common code to recognize and/or strip the arglist from documentation into `function-documentation-1'. Use in `function-arglist' and `function-documentation'. Modify `function-arglist' so it looks for the `arguments: ' stuff in all doc strings, not just subrs/autoloads, so that CL functions get recognized properly. Change the regexp used to match "arguments: " specs to allow nested parens inside the arg list (happens when you have a default value specified in a CL arglist).
author Ben Wing <ben@xemacs.org>
date Tue, 23 Feb 2010 01:12:13 -0600
parents 3ecd8885ac67
children 7910031dd78a
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
1 /* XPM */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
2 static char * disk[] = {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
3 "33 33 6 1",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
4 "X c Gray75 s backgroundToolBarColor",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
5 "u c #000000000000 s foregroundToolBarColor",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
6 "o c black",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
7 "O c Gray60",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
8 "+ c Gray90",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
9 "@ c Gray40",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
10 "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
11 "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
12 "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
13 "XXXXXXXXooooooooooooooooooXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
14 "XXXXXXXXoOOo++++++++++oOOoXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
15 "XXXXXXXXoOOo++++++++++oOOoXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
16 "XXXXXXXXoOOo++++++++++oOooXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
17 "XXXXXXXXoOOo++++++++++oOOoXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
18 "XXXXXXXXoOOo++++++++++oOOoXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
19 "XXXXXXXXoOOo++++++++++oOOoXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
20 "XXXXXXXXoOOo++++++++++oOOoXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
21 "XXXXXXXXoOOo++++++++++oOOoXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
22 "XXXXXXXXoOOooooooooooooOOoXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
23 "XXXXXXXXoOOOOOOOOOOOOOOOOoXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
24 "XXXXXXXXoOOOOOOOOOOOOOOOOoXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
25 "XXXXXXXXoOOooooooooooooOOoXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
26 "XXXXXXXXoOOo@@@@@@@o++oOOoXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
27 "XXXXXXXXoOOo@@@@@@@o++oOOoXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
28 "XXXXXXXXoOOo@@@@@@@o++oOOoXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
29 "XXXXXXXXXoOo@@@@@@@o++oOOoXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
30 "XXXXXXXXXXooooooooooooooooXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
31 "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
32 "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
33 "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
34 "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
35 "XXXXXXXXXuuuXXXXXXXXXXXXXXXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
36 "XXXXXXXXuXXXXuuXXuXXuXXuXXXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
37 "XXXXXXXXuuuXXXXuXuXXuXuXuXXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
38 "XXXXXXXXXXXuXuuuXuXXuXuuuXXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
39 "XXXXXXXXXXXuXuXuXuXuXXuXXXXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
40 "XXXXXXXXuuuXXuuXuXuXXXXuuXXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
41 "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
42 "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX"};