(current-load-list): Set it to nil.

If have frames, load `faces'.

1 files changed, 3 insertions, 0 deletions

diff --git a/lisp/loadup.el b/lisp/loadup.el
index 2f39713e6aa..ce81dbd1403 100644
--- a/lisp/loadup.el
+++ b/lisp/loadup.el
@@ -55,6 +55,8 @@
       (load "frame")
       (load "mouse")
       (garbage-collect)
+      (load "faces")
+      (garbage-collect)
       (load "menu-bar")
       (load "scroll-bar")
       (load "select")))
@@ -166,6 +168,7 @@
 ;by writing a site-init.el that loads them.
 ;See also "site-load" above.
 (load "site-init" t)
+(setq current-load-list nil)
 (garbage-collect)
 
 ;;; At this point, we're ready to resume undo recording for scratch.