changeset 3182:d38749acdf27

(x-create-frame-with-faces): Handle reverseVideo resource.
author Richard M. Stallman <rms@gnu.org>
date Thu, 27 May 1993 23:50:21 +0000
parents b2e5c888f5f6
children c7ae5e66a98c
files lisp/faces.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/faces.el	Thu May 27 23:48:18 1993 +0000
+++ b/lisp/faces.el	Thu May 27 23:50:21 1993 +0000
@@ -743,7 +743,9 @@
       (set-frame-face-alist frame faces)
 
       (if (cdr (or (assq 'reverse parameters)
-		   (assq 'reverse default-frame-alist)))
+		   (assq 'reverse default-frame-alist)
+		   (cons nil
+			 (x-get-resource "reverseVideo" "Reversevideo"))))
 	  (let ((params (frame-parameters frame)))
 	    (modify-frame-parameters
 	     frame