aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii2002-01-25 17:29:34 +0000
committerEli Zaretskii2002-01-25 17:29:34 +0000
commit818cd248c3a22df7517554a00fa065e77eecf788 (patch)
tree7bc939dc9e503e8e82b0bca15de8f92fb69a8a56
parente47cd3c4e2a137839698dc046e0745b57b02ae1d (diff)
downloademacs-818cd248c3a22df7517554a00fa065e77eecf788.tar.gz
emacs-818cd248c3a22df7517554a00fa065e77eecf788.zip
Explain in a comment why the default background-setting code is still
here, although xterm.l and rxvt.el do that better.
-rw-r--r--lisp/startup.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/startup.el b/lisp/startup.el
index 12097f5fe8f..932f12bf9b9 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -514,6 +514,9 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'."
514 (or (null bg) 514 (or (null bg)
515 (member bg '(unspecified "unspecified-bg"))))) 515 (member bg '(unspecified "unspecified-bg")))))
516 (setq term (getenv "TERM")) 516 (setq term (getenv "TERM"))
517 ;; Some files in lisp/term do a better job with the
518 ;; background mode, but we leave this here anyway, in
519 ;; case they remove those files.
517 (if (string-match "^\\(xterm\\|rxvt\\|dtterm\\|eterm\\)" 520 (if (string-match "^\\(xterm\\|rxvt\\|dtterm\\|eterm\\)"
518 term) 521 term)
519 (setq frame-background-mode 'light))) 522 (setq frame-background-mode 'light)))