(customize-changed-options): Undo last doc change.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 39961050d146d44d368fac2dd0da88619bcff315..d6e2c1ed44265c89a6656a033664b0028c442f50 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2003-01-18  Markus Rost  <rost@math.ohio-state.edu>
+
+       * cus-edit.el (customize-changed-options): Undo last doc change.
+
 2003-01-17  Dave Love  <fx@gnu.org>
 
        * international/ucs-tables.el: Redo 8859-6 change in the right

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 6a666513e5cd8c0e6d32824da33bc2e4b30b4fcf..5b98c13659b8e98b4d370915d55daf9ff3b54616 100644 (file)
--- 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))