aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/term/x-win.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/term/x-win.el')
-rw-r--r--lisp/term/x-win.el7
1 files changed, 7 insertions, 0 deletions
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index 4d3dda600e..263a0a06d8 100644
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -529,6 +529,13 @@ This returns ARGS with the arguments that have been processed removed."
(setq initial-frame-alist (append initial-frame-alist
(x-parse-geometry res-geometry)))))
+;; Check the reverseVideo resource.
+(if (assoc
+ (x-get-resource "reverseVideo"
+ "ReverseVideo")
+ '("True" "true" "Yes" "yes"))
+ (setq default-frame-alist (cons '(reverse . t) default-frame-alist)))
+
;; Set x-selection-timeout, measured in milliseconds.
(let ((res-selection-timeout
(x-get-resource "selectionTimeout" "SelectionTimeout")))