summaryrefslogtreecommitdiff
path: root/lisp/startup.el
diff options
context:
space:
mode:
authorMiles Bader <miles@gnu.org>2000-10-19 09:04:02 +0000
committerMiles Bader <miles@gnu.org>2000-10-19 09:04:02 +0000
commitbc0ce3a80f42de00867dfaf1be3cbb1eb34ebc26 (patch)
treeb421b722fc6b6a0a5fdb0d250811c2c3387eb9e4 /lisp/startup.el
parent6a63a086a3311b4834fb7e7a23a6c5858ed662b9 (diff)
downloademacs-bc0ce3a80f42de00867dfaf1be3cbb1eb34ebc26.tar.gz
(normal-top-level):
Call `frame-set-background-mode' after `frame-notice-user-settings' because the latter doesn't call the former on a tty.
Diffstat (limited to 'lisp/startup.el')
-rw-r--r--lisp/startup.el7
1 files changed, 7 insertions, 0 deletions
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))