Mercurial > emacs
changeset 4293:99e31e531877
(normal-top-level): Call font-menu-add-default.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 26 Jul 1993 20:03:00 +0000 |
| parents | 990f6ee7f527 |
| children | 644e33e3ab38 |
| files | lisp/startup.el |
| diffstat | 1 files changed, 5 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/startup.el Mon Jul 26 19:14:26 1993 +0000 +++ b/lisp/startup.el Mon Jul 26 20:03:00 1993 +0000 @@ -148,8 +148,13 @@ (run-hooks 'emacs-startup-hook) (and term-setup-hook (run-hooks 'term-setup-hook)) + ;; Modify the initial frame based on what .emacs puts into + ;; ...-frame-alist. (if (fboundp 'frame-notice-user-settings) (frame-notice-user-settings)) + ;; Now we know the user's default font, so add it to the menu. + (if (fboundp 'font-menu-add-default) + (font-menu-add-default)) (and window-setup-hook (run-hooks 'window-setup-hook)))))