# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 679617221 0
# Node ID 5f0324deb0c5fd08dd4bcf419d52fdb79b9ba837
# Parent  885bf0750dbb41456672c7222134ed302debcbb0
*** empty log message ***

diff -r 885bf0750dbb -r 5f0324deb0c5 lisp/term/x-win.el
--- a/lisp/term/x-win.el	Mon Jul 15 21:27:11 1991 +0000
+++ b/lisp/term/x-win.el	Mon Jul 15 22:33:41 1991 +0000
@@ -626,10 +626,14 @@
 ;;; Do the actual X Windows setup here; the above code just defines
 ;;; functions and variables that we use now.
 
-;; 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"))))
+
+;; xterm.c depends on using interrupt-driven input, but we don't want
+;; the fcntls to apply to the terminal, so we do this after opening
+;; the display.
+(set-input-mode t nil t)
+
 (x-read-resources)
 (setq command-line-args (x-handle-args command-line-args))
 (x-pop-initial-window)