view etc/toolbar/workshop-cap-xx.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
line wrap: on
line source

/* XPM */
static char * xemacs-cap-workshop-xx_xpm[] = {
"33 33 8 1",
" 	c #BDBDBDBDBDBD s backgroundToolBarColor",
".	c #BDBDBDBDBDBD",
"X	c #737373737373",
"o	c #737373737373",
"O	c #737373737373",
"+	c #BDBDBDBDBDBD",
"@	c #ADADADADADAD",
"#	c #737373737373",
"                                 ",
"                                 ",
"                                 ",
"    ....  .....   ..             ",
"   .XXXX ..XXXo   OX.            ",
"    +XXo.. @XXO   @@.            ",
"     XXX.  .XXX   O..            ",
"     OXX+  @XXX   O.             ",
"     @XXo. o@XXO.@@. XXX. .      ",
"      XXX..@ XXX.o.@X.. oX@      ",
"      OXX@O  oXX@O.X@.. .X@      ",
"      .XXXO  +XXX@+XO.   @@      ",
"       XXX    XXX @XXO           ",
"       OXX    OXO  XXXX@         ",
"       .X#    @X@  @XXXXX@       ",
"        X      X    .XXXXX@      ",
"                     .@XXXX      ",
"                  @    .OXX      ",
"                  @#.    XX      ",
"                  @X     X       ",
"                  @oo@..X@       ",
"                   ..XXX         ",
"                                 ",
"                                 ",
"         X        X              ",
" X  X  X X     XX X              ",
" X  X  X X  X X   XXX   XX  XXX  ",
"  X X X  X X  XX  X  X X  X X  X ",
"  X X X  XX     X X  X X  X X  X ",
"   X X   X X    X X  X X  X X  X ",
"   X X   X  X XX  X  X  XX  XXX  ",
"                            X    ",
"                                 "};