summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1997-04-14 03:05:04 +0000
committerRichard M. Stallman <rms@gnu.org>1997-04-14 03:05:04 +0000
commitb092a1345b850909a53f63373c4c1d18b641b243 (patch)
treefa784fe08838c09fb69b5ed0d4c4f2f9744b4157
parent0a3fc8a2dee849e92823acb7be50d2156a541a9a (diff)
downloademacs-b092a1345b850909a53f63373c4c1d18b641b243.tar.gz
(make-frame): Call custom-initialize-frame
only if cus-face is loaded.
-rw-r--r--lisp/frame.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/frame.el b/lisp/frame.el
index 1396aa11785..ddd565602b5 100644
--- 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))