/[emacs]/emacs/lisp/cus-edit.el
ViewVC logotype

Diff of /emacs/lisp/cus-edit.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.133.4.2 by pj, Sat Feb 2 15:56:16 2002 UTC revision 1.133.4.3 by monnier, Fri Aug 30 21:35:53 2002 UTC
# Line 3694  or (if there were none) at the end of th Line 3694  or (if there were none) at the end of th
3694    "Ignoring WIDGET, create a menu entry for customization group SYMBOL."    "Ignoring WIDGET, create a menu entry for customization group SYMBOL."
3695    `( ,(custom-unlispify-menu-entry symbol t)    `( ,(custom-unlispify-menu-entry symbol t)
3696       :filter (lambda (&rest junk)       :filter (lambda (&rest junk)
3697                 (cdr (custom-menu-create ',symbol)))))                 (let ((menu (custom-menu-create ',symbol)))
3698                     (if (consp menu) (cdr menu) menu)))))
3699    
3700  ;;;###autoload  ;;;###autoload
3701  (defun custom-menu-create (symbol)  (defun custom-menu-create (symbol)

Legend:
Removed from v.1.133.4.2  
changed lines
  Added in v.1.133.4.3

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26