diff lisp/custom/custom.el @ 32:e04119814345 r19-15b99

Import from CVS: tag r19-15b99
author cvs
date Mon, 13 Aug 2007 08:52:56 +0200
parents ec9a17fef872
children d620409f5eb8
line wrap: on
line diff
--- a/lisp/custom/custom.el	Mon Aug 13 08:52:30 2007 +0200
+++ b/lisp/custom/custom.el	Mon Aug 13 08:52:56 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]