changeset 3183:c7ae5e66a98c

(frame-initialize): Handle reverseVideo resource.
author Richard M. Stallman <rms@gnu.org>
date Thu, 27 May 1993 23:50:38 +0000
parents d38749acdf27
children 29de1b20b68b
files lisp/frame.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/frame.el	Thu May 27 23:50:21 1993 +0000
+++ b/lisp/frame.el	Thu May 27 23:50:38 1993 +0000
@@ -100,7 +100,9 @@
 			  (new-frame initial-frame-alist)))
 	      ;; Handle `reverse' as a parameter.
 	      (if (cdr (or (assq 'reverse initial-frame-alist)
-			   (assq 'reverse default-frame-alist)))
+			   (assq 'reverse default-frame-alist)
+			   (cons nil
+				 (x-get-resource "reverseVideo" "Reversevideo"))))
 		  (let ((params (frame-parameters frame-initial-frame)))
 		    (modify-frame-parameters
 		     frame-initial-frame