Mercurial > hg > xemacs-beta

diff lisp/x11/x-menubar.el @ 153:25f70ba0133c r20-3b3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b3
author cvs
date Mon, 13 Aug 2007 09:38:25 +0200
parents 59463afc5666
children 43dd3413c7c7
line wrap: on
line diff
--- a/lisp/x11/x-menubar.el	Mon Aug 13 09:37:21 2007 +0200
+++ b/lisp/x11/x-menubar.el	Mon Aug 13 09:38:25 2007 +0200
@@ -140,10 +140,11 @@
       ("Customize"
        ("Emacs" :filter (lambda (&rest junk)
 			   (cdr (custom-menu-create 'emacs))))
-       ["Group..." customize t]
+       ["Group..." customize-group t]
        ["Variable..." customize-variable t]
        ["Face..." customize-face t]
-       ["Saved..." customize-customized t]
+       ["Saved..." customize-saved t]
+       ["Set..." customize-customized t]
        ["Apropos..." customize-apropos t])
       ["Read Only" (toggle-read-only)
        :style toggle :selected buffer-read-only]
@@ -542,7 +543,7 @@
 	    (strokes-mode)
 	  (beep)
 	  (message "This option requires a window system."))
-	:style toggle :selected (and strokes-enabled-p window-system)])
+	:style toggle :selected (and strokes-mode window-system)])
       ("Open URLs With"
        ["Emacs-W3" (setq browse-url-browser-function 'browse-url-w3)
 	:style radio