[elpa] externals/exwm 15ad591 35/64: Fix bug when moving a window to the current workspace

[Chris Feng]

branch: externals/exwm
commit 15ad591d978836b753839014f3c7ce67111763c1
Author: Philip <address@hidden>
Commit: Philip <address@hidden>

    Fix bug when moving a window to the current workspace
    
        * exwm-workspace.el (exwm-workspace-move-window): Run
              reparenting code when moving a window to the current workspace.
---
 exwm-workspace.el |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/exwm-workspace.el b/exwm-workspace.el
index 09112d2..00f7326 100644
--- a/exwm-workspace.el
+++ b/exwm-workspace.el
@@ -168,9 +168,9 @@ The optional FORCE option is for internal use only."
   (unless id (setq id (exwm--buffer->id (window-buffer))))
   (unless (and (<= 0 index) (< index exwm-workspace-number))
     (user-error "[EXWM] Workspace index out of range: %d" index))
-  (when (/= exwm-workspace-current-index index)
+  (with-current-buffer (exwm--id->buffer id)
     (let ((frame (elt exwm-workspace--list index)))
-      (with-current-buffer (exwm--id->buffer id)
+      (when (not (equal exwm--frame frame))
         (setq exwm--frame frame)
         (exwm-workspace-rename-buffer
          (concat " " (replace-regexp-in-string "^\\s-*" "" (buffer-name))))