From 1fc6097bfa931cf17f8a5b76ec8442e22d33c724 Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Wed, 25 Apr 2012 16:38:11 +0800 Subject: [PATCH] * cus-edit.el (custom-buffer-create-internal): Update header text. --- lisp/ChangeLog | 4 ++++ lisp/cus-edit.el | 11 +++++------ 2 files changed, 9 insertions(+), 6 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e93cd07bda0..76b855e6bc9 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2012-04-25 Chong Yidong + + * cus-edit.el (custom-buffer-create-internal): Update header text. + 2012-04-25 Eli Zaretskii * progmodes/gdb-mi.el (gdb-init-1): Condition Windows-specific diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index 4a003f2d043..8198a4594c4 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el @@ -1591,13 +1591,12 @@ Otherwise use brackets." (let ((init-file (or custom-file user-init-file))) ;; Insert verbose help at the top of the custom buffer. (when custom-buffer-verbose-help - (widget-insert (if init-file - "To apply changes, use the Save or Set buttons." - "Custom settings cannot be saved; maybe you started Emacs with `-q'.") - "\nFor details, see ") + (unless init-file + (widget-insert "Custom settings cannot be saved; maybe you started Emacs with `-q'.\n")) + (widget-insert "For help using this buffer, see ") (widget-create 'custom-manual - :tag "Saving Customizations" - "(emacs)Saving Customizations") + :tag "Easy Customization" + "(emacs)Easy Customization") (widget-insert " in the ") (widget-create 'custom-manual :tag "Emacs manual" -- 2.39.2