mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-06 11:50:51 -08:00
Code Issues Projects Releases Wiki Activity

*** empty log message ***

Browse source
This commit is contained in:
Jim Blandy 1991-07-15 22:33:41 +00:00
parent 1ab256cb99
commit e9de784c5a
1 changed files with 6 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/term/x-win.el
View file

@ -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)