# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1011979774 0
# Node ID 019acf15aa7a3359b8ff706e163d7cb2edd59dce
# Parent  201a6b278692f74b6ed3e772840acc9a6719c8bc
Explain in a comment why the default background-setting code is still
here, although xterm.l and rxvt.el do that better.

diff -r 201a6b278692 -r 019acf15aa7a lisp/startup.el
--- a/lisp/startup.el	Fri Jan 25 14:35:42 2002 +0000
+++ b/lisp/startup.el	Fri Jan 25 17:29:34 2002 +0000
@@ -514,6 +514,9 @@
 			     (or (null bg)
 				 (member bg '(unspecified "unspecified-bg")))))
 		  (setq term (getenv "TERM"))
+		  ;; Some files in lisp/term do a better job with the
+		  ;; background mode, but we leave this here anyway, in
+		  ;; case they remove those files.
 		  (if (string-match "^\\(xterm\\|rxvt\\|dtterm\\|eterm\\)"
 				    term)
 		      (setq frame-background-mode 'light)))