From bc0ce3a80f42de00867dfaf1be3cbb1eb34ebc26 Mon Sep 17 00:00:00 2001 From: Miles Bader Date: Thu, 19 Oct 2000 09:04:02 +0000 Subject: (normal-top-level): Call `frame-set-background-mode' after `frame-notice-user-settings' because the latter doesn't call the former on a tty. --- lisp/startup.el | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'lisp/startup.el') diff --git a/lisp/startup.el b/lisp/startup.el index 432715182d2..2d3b8a70d4e 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -473,6 +473,13 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'." ;; ...-frame-alist. (if (fboundp 'frame-notice-user-settings) (frame-notice-user-settings)) + (if (fboundp 'frame-set-background-mode) + ;; Set the faces for the initial background mode even if + ;; frame-notice-user-settings didn't (such as on a tty). + ;; frame-set-background-mode is idempotent, so it won't + ;; cause any harm if it's already been done. + (frame-set-background-mode (selected-frame))) + ;; Now we know the user's default font, so add it to the menu. (if (fboundp 'font-menu-add-default) (font-menu-add-default)) -- cgit v1.2.1