aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/term/rxvt.el
diff options
context:
space:
mode:
authorKaroly Lorentey <[email protected]>2005-07-05 22:12:55 +0000
committerKaroly Lorentey <[email protected]>2005-07-05 22:12:55 +0000
commit41be4f66fd33b17eba3e3ed4b8f8828c77f18517 (patch)
tree23558632ba5eac56317f1df9fac514f439e7f82d /lisp/term/rxvt.el
parent2f98e6e37b5870a644a178d4d6998c6c7f1f68dd (diff)
parent41700b79db6e52aee51d9d57c453b5f6fbd61e6e (diff)
Merged from [email protected] (patch 83-87, 449-468)
Patches applied: * [email protected]/emacs--cvs-trunk--0--patch-449 Update from CVS * [email protected]/emacs--cvs-trunk--0--patch-450 Update from CVS * [email protected]/emacs--cvs-trunk--0--patch-451 Update from CVS * [email protected]/emacs--cvs-trunk--0--patch-452 Update from CVS * [email protected]/emacs--cvs-trunk--0--patch-453 Update from CVS: lisp/subr.el (add-to-ordered-list): Doc fix. * [email protected]/emacs--cvs-trunk--0--patch-454 Update from CVS * [email protected]/emacs--cvs-trunk--0--patch-455 Update from CVS * [email protected]/emacs--cvs-trunk--0--patch-456 Update from CVS * [email protected]/emacs--cvs-trunk--0--patch-457 Update from CVS * [email protected]/emacs--cvs-trunk--0--patch-458 Merge from gnus--rel--5.10 * [email protected]/emacs--cvs-trunk--0--patch-459 Update from CVS * [email protected]/emacs--cvs-trunk--0--patch-460 Update from CVS * [email protected]/emacs--cvs-trunk--0--patch-461 Merge from gnus--rel--5.10 * [email protected]/emacs--cvs-trunk--0--patch-462 Update from CVS * [email protected]/emacs--cvs-trunk--0--patch-463 Update from CVS * [email protected]/emacs--cvs-trunk--0--patch-464 Merge from gnus--rel--5.10 * [email protected]/emacs--cvs-trunk--0--patch-465 Update from CVS * [email protected]/emacs--cvs-trunk--0--patch-466 Update from CVS * [email protected]/emacs--cvs-trunk--0--patch-467 Update from CVS * [email protected]/emacs--cvs-trunk--0--patch-468 Update from CVS * [email protected]/gnus--rel--5.10--patch-83 Merge from emacs--cvs-trunk--0 * [email protected]/gnus--rel--5.10--patch-84 Merge from emacs--cvs-trunk--0 * [email protected]/gnus--rel--5.10--patch-85 Update from CVS * [email protected]/gnus--rel--5.10--patch-86 Update from CVS * [email protected]/gnus--rel--5.10--patch-87 Update from CVS git-archimport-id: [email protected]/emacs--multi-tty--0--patch-371
Diffstat (limited to 'lisp/term/rxvt.el')
-rw-r--r--lisp/term/rxvt.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/term/rxvt.el b/lisp/term/rxvt.el
index f5937701d1..6e45cced2d 100644
--- a/lisp/term/rxvt.el
+++ b/lisp/term/rxvt.el
@@ -160,7 +160,7 @@ for the currently selected frame."
"Set background mode as appropriate for the default rxvt colors."
(let ((fgbg (server-getenv "COLORFGBG"))
bg rgb)
- (setq frame-background-mode 'light) ; default
+ (setq default-frame-background-mode 'light)
(when (and fgbg
(string-match ".*;\\([0-9][0-9]?\\)\\'" fgbg))
(setq bg (string-to-number (substring fgbg (match-beginning 1))))
@@ -173,7 +173,7 @@ for the currently selected frame."
;; The following line assumes that white is the 15th
;; color in rxvt-standard-colors.
(* (apply '+ (car (cddr (nth 15 rxvt-standard-colors)))) 0.6))
- (setq frame-background-mode 'dark)))
+ (setq default-frame-background-mode 'dark)))
(frame-set-background-mode (selected-frame))))
;; Do it!