diff options
author | Markus Rost <rost@math.uni-bielefeld.de> | 2003-01-18 03:19:28 +0000 |
---|---|---|
committer | Markus Rost <rost@math.uni-bielefeld.de> | 2003-01-18 03:19:28 +0000 |
commit | 2ee398c4c253f33628a7ceed3d428dd5f9e9d872 (patch) | |
tree | c2adb273f13fdea8e6afdf98c3b2e58807ef598d /lisp/cus-edit.el | |
parent | da8249b4a93f530830e5bc9ae941e5091de88eba (diff) | |
download | emacs-2ee398c4c253f33628a7ceed3d428dd5f9e9d872.tar.gz |
(customize-changed-options): Undo last doc change.
Diffstat (limited to 'lisp/cus-edit.el')
-rw-r--r-- | lisp/cus-edit.el | 14 |
1 files changed, 5 insertions, 9 deletions
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index 6a666513e5c..5b98c13659b 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el @@ -950,11 +950,7 @@ values have changed since the previous major Emacs release. With argument SINCE-VERSION (a string), customize all user option variables that were added (or their meanings were changed) since that -version. - -Custom version numbers are actually associated to symbols. A symbol -with version number VERSION will be listed with all its definitions as -custom variable, face, or group." +version." (interactive "sCustomize options changed, since version (default all versions): ") (if (equal since-version "") @@ -970,9 +966,9 @@ custom variable, face, or group." ;; custom-load-symbol for this. (put 'custom-versions-load-alist 'custom-loads nil) (dolist (elt custom-versions-load-alist) - (if (customize-version-lessp since-version (car elt)) - (dolist (load (cdr elt)) - (custom-add-load 'custom-versions-load-alist load)))) + (if (customize-version-lessp since-version (car elt)) + (dolist (load (cdr elt)) + (custom-add-load 'custom-versions-load-alist load)))) (custom-load-symbol 'custom-versions-load-alist) (put 'custom-versions-load-alist 'custom-loads nil) @@ -3287,7 +3283,7 @@ If GROUPS-ONLY non-nil, return only those members that are groups." (defun custom-group-value-create (widget) "Insert a customize group for WIDGET in the current buffer." (unless (eq (widget-get widget :custom-state) 'hidden) - (custom-load-widget widget)) + (custom-load-widget widget)) (let* ((state (widget-get widget :custom-state)) (level (widget-get widget :custom-level)) ;; (indent (widget-get widget :indent)) |