diff --git a/lisp/frame.el b/lisp/frame.el
index 2af75dc47a1..dca7f816777 100644
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -458,6 +458,7 @@ on `after-make-frame-functions' are run with one arg, the newly created frame."
   (interactive)
   (run-hooks 'before-make-frame-hook)
   (let ((frame (funcall frame-creation-function parameters)))
+    (custom-initialize-frame frame)
     (run-hook-with-args 'after-make-frame-functions frame)
     frame))