# HG changeset patch # User Richard M. Stallman # Date 1135300868 0 # Node ID 1c2cd41aeda739006f8e0f17749b122b74621808 # Parent 1c62bde2851806f4ff742667e0c0eff54e8512a1 (customize-browse): Reword the top-of-buffer help intro. (custom-buffer-create-internal): Fix previous change. diff -r 1c62bde28518 -r 1c2cd41aeda7 lisp/cus-edit.el --- 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")