# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 899418555 0
# Node ID 8e80015677717224b39a278e528519ecad5d57fa
# Parent  ce4bb28a20e4a72f3afcfed21ffd14170cfc6171
(customize-changed-options): Clean up previous change.

diff -r ce4bb28a20e4 -r 8e8001567771 lisp/cus-edit.el
--- a/lisp/cus-edit.el	Thu Jul 02 22:27:24 1998 +0000
+++ b/lisp/cus-edit.el	Thu Jul 02 22:29:15 1998 +0000
@@ -907,15 +907,15 @@
 			     (cons (list symbol 'custom-variable) found))))))
     (if (not found)
 	(error "No user options have changed defaults in recent Emacs versions")
-      (put 'custom-versions-load-alist 'custom-loads 
-	   ;; Get all the files that correspond to element from the
-	   ;; VERSIONS list. This could use some simplification.
-	   (let ((flist nil))
-	     (while versions
-	       (push (copy-sequence 
-		      (cdr (assoc (car versions)  custom-versions-load-alist)))
-		     flist)
-	       (setq versions (cdr versions)))
+      (let ((flist nil))
+	(while versions
+	  (push (copy-sequence 
+		 (cdr (assoc (car versions)  custom-versions-load-alist)))
+		flist)
+	  (setq versions (cdr versions)))
+	(put 'custom-versions-load-alist 'custom-loads 
+	     ;; Get all the files that correspond to element from the
+	     ;; VERSIONS list. This could use some simplification.
 	     (apply 'nconc flist)))
       ;; Because we set all the files needed to be loaded as a
       ;; `custom-loads' property to `custom-versions-load-alist' this