From e9de784c5a33e94c0794c53b7db0833d0a00845b Mon Sep 17 00:00:00 2001 From: Jim Blandy Date: Mon, 15 Jul 1991 22:33:41 +0000 Subject: [PATCH] *** empty log message *** --- lisp/term/x-win.el | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el index abf794f1ad0..30f5fa9b2e3 100644 --- a/lisp/term/x-win.el +++ b/lisp/term/x-win.el @@ -626,10 +626,14 @@ This returns ARGS with the arguments that have been processed removed." ;;; 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)