* xcb-debug.el (xcb-debug:-with-debug-buffer): Ensure window is alive.

emacs-exwm · Jan 19, 2024 · 4b4d2c0 · 4b4d2c0
1 parent 117cf88
commit 4b4d2c0
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/xcb-debug.el b/xcb-debug.el
@@ -77,8 +77,9 @@ Here are some predefined candidates:
   `(with-current-buffer (xcb-debug:-get-buffer)
      (let (windows-eob)
        ;; Note windows whose point is at EOB.
-       (dolist (w (get-buffer-window-list xcb-debug:buffer t 'nomini))
-         (when (= (window-point w) (point-max))
+       (dolist (w (get-buffer-window-list (current-buffer) t 'nomini))
+         (when (and (window-live-p w)
+                    (= (window-point w) (point-max)))
            (push w windows-eob)))
        (save-excursion
          (goto-char (point-max))