Mercurial > hg > xemacs-beta

diff lisp/custom/cus-edit.el @ 157:6b37e6ddd302 r20-3b5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b5
author cvs
date Mon, 13 Aug 2007 09:40:41 +0200
parents 43dd3413c7c7
children 28f395d8dc7a
line wrap: on
line diff
--- a/lisp/custom/cus-edit.el	Mon Aug 13 09:39:46 2007 +0200
+++ b/lisp/custom/cus-edit.el	Mon Aug 13 09:40:41 2007 +0200
@@ -4,7 +4,7 @@
 ;;
 ;; Author: Per Abrahamsen <abraham@dina.kvl.dk>
 ;; Keywords: help, faces
-;; Version: 1.9907
+;; Version: 1.9908
 ;; X-URL: http://www.dina.kvl.dk/~abraham/custom/
 
 ;; This file is part of GNU Emacs.
@@ -959,6 +959,7 @@
 	(if (= (length options) 1)
 	    (mapcar (lambda (entry)
 		      (widget-create (nth 1 entry)
+				     :documentation-shown t
 				     :custom-state 'unknown
 				     :tag (custom-unlispify-tag-name
 					   (nth 0 entry))
@@ -2556,6 +2557,7 @@
 (unless custom-mode-map
   (setq custom-mode-map (make-sparse-keymap))
   (set-keymap-parent custom-mode-map widget-keymap)
+  (suppress-keymap custom-mode-map)
   (define-key custom-mode-map "q" 'bury-buffer))
 
 (easy-menu-define custom-mode-customize-menu