[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/exwm f45e9b9 6/6: Fix XTerm crash on startup
From: |
Chris Feng |
Subject: |
[elpa] externals/exwm f45e9b9 6/6: Fix XTerm crash on startup |
Date: |
Mon, 16 Jul 2018 12:04:48 -0400 (EDT) |
branch: externals/exwm
commit f45e9b92731432cd2b01e065d9910321e3a9c9f7
Author: Chris Feng <address@hidden>
Commit: Chris Feng <address@hidden>
Fix XTerm crash on startup
* exwm-input.el (exwm-input--set-focus): Applications like XTerm
crashes on receiving WM_TAKE_FOCUS so only send it to X windows
accepting it.
---
exwm-input.el | 22 ++++++++++++----------
1 file changed, 12 insertions(+), 10 deletions(-)
diff --git a/exwm-input.el b/exwm-input.el
index 80ab352..57a2873 100644
--- a/exwm-input.el
+++ b/exwm-input.el
@@ -159,26 +159,28 @@ This value should always be overwritten.")
(when (exwm--id->buffer id)
(with-current-buffer (exwm--id->buffer id)
(exwm-input--update-timestamp
- (lambda (timestamp id send-input-focus)
+ (lambda (timestamp id send-input-focus wm-take-focus)
(when send-input-focus
(xcb:+request exwm--connection
(make-instance 'xcb:SetInputFocus
:revert-to xcb:InputFocus:Parent
:focus id
:time timestamp)))
- (let ((event (make-instance 'xcb:icccm:WM_TAKE_FOCUS
- :window id
- :time timestamp)))
- (setq event (xcb:marshal event exwm--connection))
- (xcb:+request exwm--connection
- (make-instance 'xcb:icccm:SendEvent
- :destination id
- :event event)))
+ (when wm-take-focus
+ (let ((event (make-instance 'xcb:icccm:WM_TAKE_FOCUS
+ :window id
+ :time timestamp)))
+ (setq event (xcb:marshal event exwm--connection))
+ (xcb:+request exwm--connection
+ (make-instance 'xcb:icccm:SendEvent
+ :destination id
+ :event event))))
(exwm-input--set-active-window id)
(xcb:flush exwm--connection))
id
(or exwm--hints-input
- (not (memq xcb:Atom:WM_TAKE_FOCUS exwm--protocols)))))))
+ (not (memq xcb:Atom:WM_TAKE_FOCUS exwm--protocols)))
+ (memq xcb:Atom:WM_TAKE_FOCUS exwm--protocols)))))
(defun exwm-input--update-timestamp (callback &rest args)
"Fetch the latest timestamp from the server and feed it to CALLBACK.
- [elpa] externals/exwm updated (0680be1 -> f45e9b9), Chris Feng, 2018/07/16
- [elpa] externals/exwm 1364f80 4/6: Add support for automatic cursor warping, Chris Feng, 2018/07/16
- [elpa] externals/exwm 6be7298 2/6: Also send a WM_TAKE_FOCUS when setting focus with SetInputFocus, Chris Feng, 2018/07/16
- [elpa] externals/exwm f45e9b9 6/6: Fix XTerm crash on startup,
Chris Feng <=
- [elpa] externals/exwm c1b6a29 3/6: Shrink Emacs frames with X request, Chris Feng, 2018/07/16
- [elpa] externals/exwm 4bb2d87 1/6: Revert "Grab & Replay key events with XI2 and XTEST", Chris Feng, 2018/07/16
- [elpa] externals/exwm bc5f0b3 5/6: ; Use `derived-mode-p'., Chris Feng, 2018/07/16