(make-frame): Call custom-initialize-frame

only if cus-face is loaded.

(make-frame): Call custom-initialize-frame
only if cus-face is loaded.
b092a134 · Richard M. Stallman · 0a3fc8a2 · b092a134
Commit b092a134 authored Apr 14, 1997 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

lisp/frame.el lisp/frame.el +2 -1

No files found.
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -458,7 +458,8 @@ 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)
+    (if (featurep 'cus-face)
+	(custom-initialize-frame frame))
    (run-hook-with-args 'after-make-frame-functions frame)
    frame))