From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 14 Aug 1993 09:23:46 +0000 (+0000)
Subject: (frame-initialize): Check for `on' or `true'
X-Git-Tag: emacs-19.34~11226
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=88bb5793b5f89b68eec849e5278c2aea7c096896;p=emacs.git

(frame-initialize): Check for `on' or `true'
as reverseVideo resource value.
---

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