about summary refs log tree commit diff
diff options
context:
space:
mode:
authorChris Feng <chris.w.feng@gmail.com>2017-04-16T13·46+0800
committerChris Feng <chris.w.feng@gmail.com>2017-04-16T13·46+0800
commitd4cfa564be680cec3fe1372e3bc9b29834e0d98a (patch)
treedcf7cd7bb5af2f02cd802ad158f631623b861d9b
parent7a5bb1156d07848e465f55fd31f8ec755b52aa01 (diff)
Avoid comparing X display names
* exwm-workspace.el (exwm-workspace--add-frame-as-workspace): An X
display name set by XELB can be different from (but equivalent with)
the one set by Emacs.
-rw-r--r--exwm-workspace.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/exwm-workspace.el b/exwm-workspace.el
index 1b904d4f11d3..3efd084525e1 100644
--- a/exwm-workspace.el
+++ b/exwm-workspace.el
@@ -1164,8 +1164,8 @@ Please check `exwm-workspace--minibuffer-own-frame-p' first."
     (exwm--log "Frame `%s' is already a workspace" frame))
    ((not (display-graphic-p frame))
     (exwm--log "Frame `%s' is not graphical" frame))
-   ((not (string-equal (slot-value exwm--connection 'display)
-                       (frame-parameter frame 'display)))
+   ((not (memq frame (frames-on-display-list (slot-value exwm--connection
+                                                         'display))))
     (exwm--log "Frame `%s' is on a different DISPLAY (%S instead of %S)"
                frame
                (frame-parameter frame 'display)