diff options
author | Richard M. Stallman <rms@gnu.org> | 1997-04-14 03:05:04 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1997-04-14 03:05:04 +0000 |
commit | b092a1345b850909a53f63373c4c1d18b641b243 (patch) | |
tree | fa784fe08838c09fb69b5ed0d4c4f2f9744b4157 | |
parent | 0a3fc8a2dee849e92823acb7be50d2156a541a9a (diff) | |
download | emacs-b092a1345b850909a53f63373c4c1d18b641b243.tar.gz |
(make-frame): Call custom-initialize-frame
only if cus-face is loaded.
-rw-r--r-- | lisp/frame.el | 3 |
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)) |