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

(x-create-frame-with-faces): Check for `on' or `true'
as reverseVideo resource value.
---

diff --git a/lisp/faces.el b/lisp/faces.el
index 37212d90ad5..32a0c995ab0 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -876,7 +876,8 @@ selected frame."
       (if (cdr (or (assq 'reverse parameters)
 		   (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)))
 	    (modify-frame-parameters
 	     frame