branch: externals/xelb
commit 93b6b7326a4cee287d56e320d66d478aa7099b91
Author: Chris Feng <chris.w.f...@gmail.com>
Commit: Chris Feng <chris.w.f...@gmail.com>
; * xcb.el (xcb:disconnect): Flush before disconnection.
---
xcb.el | 1 +
1 file changed, 1 insertion(+)
diff --git a/xcb.el b/xcb.el
index 4cba47c..2e52e36 100644
--- a/xcb.el
+++ b/xcb.el
@@ -367,6 +367,7 @@ Concurrency is disabled as it breaks the orders of errors,
replies and events."
(cl-defmethod xcb:disconnect ((obj xcb:connection))
"Disconnect from X server."
+ (xcb:flush obj)
(delete-process (slot-value obj 'process))
;; Reset every slot to its default value
(let ((slots (eieio-class-slots 'xcb:connection)))
