about summary refs log tree commit diff
path: root/exwm-layout.el
diff options
context:
space:
mode:
authorAdrián Medraño Calvo <adrian@medranocalvo.com>2016-03-19T00·00+0000
committerAdrián Medraño Calvo <adrian@medranocalvo.com>2016-03-19T00·00+0000
commit8a1c3761e4eab018a001dcc522112269f83ba279 (patch)
treedb1ccf604f3e28c0d2c5ed998077af0595bbe056 /exwm-layout.el
parentf6cd9503e62164f9e2513755f95f7c61eeddf51e (diff)
Set the correct buffer before checking the `major-mode'
* exwm-layout.el (exwm-layout--refresh): Make sure we test the
`major-mode' of the first buffer of the floating frame.
Diffstat (limited to 'exwm-layout.el')
-rw-r--r--exwm-layout.el14
1 files changed, 7 insertions, 7 deletions
diff --git a/exwm-layout.el b/exwm-layout.el
index fd8c164d9a8e..d084c96e4424 100644
--- a/exwm-layout.el
+++ b/exwm-layout.el
@@ -255,13 +255,13 @@
     (if (not (memq frame exwm-workspace--list))
         (if (frame-parameter frame 'exwm-outer-id)
             ;; Refresh a floating frame
-            (when (eq major-mode 'exwm-mode)
-              (let ((window (frame-first-window frame)))
-                (with-current-buffer (window-buffer window)
-                  ;; It may be a buffer waiting to be killed.
-                  (when (exwm--id->buffer exwm--id)
-                    (exwm--log "Refresh floating window #x%x" exwm--id)
-                    (exwm-layout--show exwm--id window)))))
+            (let ((window (frame-first-window frame)))
+              (with-current-buffer (window-buffer window)
+                (when (and (eq major-mode 'exwm-mode)
+                           ;; It may be a buffer waiting to be killed.
+                           (exwm--id->buffer exwm--id))
+                  (exwm--log "Refresh floating window #x%x" exwm--id)
+                  (exwm-layout--show exwm--id window))))
           ;; Other frames (e.g. terminal/graphical frame of emacsclient)
           ;; We shall bury all `exwm-mode' buffers in this case
           (setq windows (window-list frame 0)) ;exclude minibuffer