From 88bb5793b5f89b68eec849e5278c2aea7c096896 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 14 Aug 1993 09:23:46 +0000 Subject: [PATCH] (frame-initialize): Check for `on' or `true' as reverseVideo resource value. --- lisp/frame.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/frame.el b/lisp/frame.el index ab41eb39621..ac4304dc09f 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -113,7 +113,8 @@ These supersede the values given in `default-frame-alist'.") (if (cdr (or (assq 'reverse initial-frame-alist) (assq 'reverse default-frame-alist) (cons nil - (x-get-resource "reverseVideo" "ReverseVideo")))) + (member (x-get-resource "reverseVideo" "ReverseVideo") + '("on" "true"))))) (let ((params (frame-parameters frame-initial-frame))) (modify-frame-parameters frame-initial-frame -- 2.39.5