aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman <[email protected]>2005-12-23 01:39:01 +0000
committerRichard M. Stallman <[email protected]>2005-12-23 01:39:01 +0000
commit50137744b86d2871f41cb7d1043eda48a90b7ecd (patch)
tree6128d5d65a6ac5a1073d98876d5d9aba65f8a9c4
parentbba50f8a9e697263139b19872ee0cc8f0e46b317 (diff)
(custom-reset-menu, custom-magic-alist, Custom-mode-menu):
Say "standard values". (Custom-reset-standard): Doc fix. (custom-face-reset-standard): Doc fix.
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/cus-edit.el14
2 files changed, 11 insertions, 7 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0efa8508fe..afaf8b6bfb 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -10,6 +10,10 @@
(customize-changed-options-previous-release): Prev release is 21.1.
(customize-changed-options): Doc fix.
(customize-changed): New alias.
+ (custom-reset-menu, custom-magic-alist, Custom-mode-menu):
+ Say "standard values".
+ (Custom-reset-standard): Doc fix.
+ (custom-face-reset-standard): Doc fix.
2005-12-22 Stefan Monnier <[email protected]>
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index ae64f94251..03ea6350e1 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -766,7 +766,7 @@ groups after non-groups, if nil do not order groups at all."
(defvar custom-reset-menu
'(("Current" . Custom-reset-current)
("Saved" . Custom-reset-saved)
- ("Erase Customization (use standard settings)" . Custom-reset-standard))
+ ("Erase Customization (use standard values)" . Custom-reset-standard))
"Alist of actions for the `Reset' button.
The key is a string containing the name of the action, the value is a
Lisp function taking the widget as an element which will be called
@@ -803,8 +803,8 @@ when the action is chosen.")
(defun Custom-reset-standard (&rest ignore)
"Erase all customization (either current or saved) for the group members.
-The immediate result is to restore them to their standard settings.
-This operation eliminates any saved settings for the group members,
+The immediate result is to restore them to their standard values.
+This operation eliminates any saved values for the group members,
making them as if they had never been customized at all."
(interactive)
(let ((children custom-options))
@@ -1780,7 +1780,7 @@ NO CUSTOMIZATION DATA; not intended to be customized." "\
something in this group is not prepared for customization.")
(standard " " nil "\
STANDARD." "\
-visible group members are all at standard settings."))
+visible group members are all at standard values."))
"Alist of customize option states.
Each entry is of the form (STATE MAGIC FACE ITEM-DESC [ GROUP-DESC ]), where
@@ -3402,8 +3402,8 @@ Optional EVENT is the location for the menu."
(get (widget-value widget) 'face-defface-spec))
(defun custom-face-reset-standard (widget)
- "Restore WIDGET to the face's standard settings.
-This operation eliminates any saved setting for the face,
+ "Restore WIDGET to the face's standard attribute values.
+This operation eliminates any saved attributes for the face,
restoring it to the state of a face that has never been customized."
(let* ((symbol (widget-value widget))
(child (car (widget-get widget :children)))
@@ -4341,7 +4341,7 @@ The format is suitable for use with `easy-menu-define'."
["Save" Custom-save t]
["Reset to Current" Custom-reset-current t]
["Reset to Saved" Custom-reset-saved t]
- ["Reset to Standard Settings" Custom-reset-standard t]
+ ["Reset to Standard Values" Custom-reset-standard t]
["Info" (info "(emacs)Easy Customization") t]))
(defun Custom-goto-parent ()