# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 677953612 0
# Node ID d14d8613706353b1461ba5d94a3941d4f1f275a4
# Parent  a9d3e8df1eec3fbac27b3dd118b6da9e0314cc15
*** empty log message ***

diff -r a9d3e8df1eec -r d14d86137063 lisp/term/x-win.el
--- a/lisp/term/x-win.el	Wed Jun 26 15:44:32 1991 +0000
+++ b/lisp/term/x-win.el	Wed Jun 26 16:26:52 1991 +0000
@@ -200,7 +200,7 @@
 		    (tail (assq key screen-default-alist))
 		    (value
 		     (or (x-get-resource (nth 1 key-resname-default))
-			 (nth 3 key-resname-default))))
+			 (nth 2 key-resname-default))))
 	       (if tail (setcdr tail value)
 		 (setq screen-default-alist
 		       (cons (cons key value)
@@ -629,10 +629,10 @@
 
 ;; xterm.c depends on using interrupt-driven input.
 (set-input-mode t nil t)
+(x-open-connection (or x-display-name
+		       (setq x-display-name (getenv "DISPLAY"))))
 (x-read-resources)
 (x-handle-args)
-(x-open-connection (or x-display-name
-		       (setq x-display-name (getenv "DISPLAY"))))
 (x-pop-initial-window)
 
 (setq suspend-hook