Mercurial > hg > xemacs-beta

diff lisp/custom/custom.el @ 110:fe104dbd9147 r20-1b7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b7
author cvs
date Mon, 13 Aug 2007 09:19:45 +0200
parents 360340f9fd5f
children 48d667d6f17f
line wrap: on
line diff
--- a/lisp/custom/custom.el	Mon Aug 13 09:18:41 2007 +0200
+++ b/lisp/custom/custom.el	Mon Aug 13 09:19:45 2007 +0200
@@ -4,7 +4,7 @@
 ;;
 ;; Author: Per Abrahamsen <abraham@dina.kvl.dk>
 ;; Keywords: help, faces
-;; Version: 1.59
+;; Version: 1.63
 ;; X-URL: http://www.dina.kvl.dk/~abraham/custom/
 
 ;;; Commentary:
@@ -297,8 +297,10 @@
 
 ;;; Menu support
 
-(defconst custom-help-menu '("Customize"
-			     ["Update menu..." custom-menu-update t]
+(defconst custom-help-menu `("Customize"
+			     ,(if (string-match "XEmacs" emacs-version)
+				  '("Emacs" :filter custom-menu-update)
+				["Update menu..." custom-menu-update t])
 			     ["Group..." customize t]
 			     ["Variable..." customize-variable t]
 			     ["Face..." customize-face t]