(custom-declare-variable-list): Process already-declared

custom variables from this list.
aquamacs-emacs · Jul 20, 1997 · d748597 · d748597
1 parent 47d79be
commit d748597
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/lisp/custom.el b/lisp/custom.el
@@ -394,6 +394,11 @@ the default value for the SYMBOL."
 
 ;;; The End.
 
+;; Process the defcustoms for variables loaded before this file.
+(while custom-declare-variable-list
+  (apply 'custom-declare-variable (car custom-declare-variable-list))
+  (setq custom-declare-variable-list (cdr custom-declare-variable-list)))
+
 (provide 'custom)
 
 ;; custom.el ends here