Mirrors/exwm2
2
0
Fork 0
mirror of https://github.com/emacs-exwm/exwm.git synced 2024-11-23 21:17:59 +01:00
Code Issues Projects Releases Packages Wiki Activity

Fix X display name comparison

Browse source 
* exwm-workspace--add-frame-as-workspace
(exwm-workspace--add-frame-as-workspace): Manually compare X display
names as there's no built-in function handles this correctly.
This commit is contained in:
Chris Feng 2017-05-30 01:25:58 +08:00
parent 2babc8d070
commit 851ed8c280
1 changed files with 5 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
exwm-workspace.el
View file

@ -1164,8 +1164,11 @@ Please check `exwm-workspace--minibuffer-own-frame-p' first."
(exwm--log "Frame `%s' is already a workspace" frame)) (exwm--log "Frame `%s' is already a workspace" frame))
((not (display-graphic-p frame)) ((not (display-graphic-p frame))
(exwm--log "Frame `%s' is not graphical" frame)) (exwm--log "Frame `%s' is not graphical" frame))
((not (memq frame (frames-on-display-list (slot-value exwm--connection ((not (string-equal
'display)))) (replace-regexp-in-string "\\.0$" ""
(slot-value exwm--connection 'display))
(replace-regexp-in-string "\\.0$" ""
(frame-parameter frame 'display))))
(exwm--log "Frame `%s' is on a different DISPLAY (%S instead of %S)" (exwm--log "Frame `%s' is on a different DISPLAY (%S instead of %S)"
frame frame
(frame-parameter frame 'display) (frame-parameter frame 'display)