changeset 67745:1c2cd41aeda7

(customize-browse): Reword the top-of-buffer help intro. (custom-buffer-create-internal): Fix previous change.
author Richard M. Stallman <rms@gnu.org>
date Fri, 23 Dec 2005 01:21:08 +0000
parents 1c62bde28518
children 76fdc265f329
files lisp/cus-edit.el
diffstat 1 files changed, 12 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/cus-edit.el	Fri Dec 23 01:18:08 2005 +0000
+++ b/lisp/cus-edit.el	Fri Dec 23 01:21:08 2005 +0000
@@ -1430,14 +1430,14 @@
 	(if description
 	    (widget-insert description))
 	(widget-insert (format ".
-%s indicate buttons; type RET or click mouse-1 to actuate one.
+%s buttons; type RET or click mouse-1 to actuate one.
 Editing a setting changes only the text in the buffer.
 Use the setting's State button to set it or save changes in it.
 Saving a change normally works by editing your Emacs init file.
 See "
 			       (if custom-raised-buttons
-				   "`Raised' buttons"
-				 "Square brackets")))
+				   "`Raised' text indicates"
+				 "Square brackets indicate")))
 	(widget-create 'info-link
 		       :tag "Custom file"
 		       "(emacs)Saving Customizations")
@@ -1562,10 +1562,15 @@
   (let ((name "*Customize Browser*"))
     (pop-to-buffer (custom-get-fresh-buffer name)))
   (custom-mode)
-  (widget-insert "\
-Square brackets show active fields; type RET or click mouse-1
-on an active field to invoke its action.
-Invoke [+] below to expand a group, and [-] to collapse an expanded group.\n")
+  (widget-insert (format "\
+%s buttons; type RET or click mouse-1
+on a button to invoke its action.
+Invoke [+] to expand a group, and [-] to collapse an expanded group.\n"
+			 (if custom-raised-buttons
+			     "`Raised' text indicates"
+			   "Square brackets indicate")))
+
+
   (if custom-browse-only-groups
       (widget-insert "\
 Invoke the [Group] button below to edit that item in another window.\n\n")