XMonad:如何在 window 浮动后再次将其重新插入到平铺布局中?

XMonad: How can I again re-insert a window back into the tiling layout after having it made floating?

我使用下面的绑定使 window 浮动和可拖动:

myMouseBindings (XConfig {XMonad.modMask = modMask}) = M.fromList $
  [
    -- mod-button1, Set the window to floating mode and move by dragging
    ((modMask, button1),
     (\w -> focus w >> mouseMoveWindow w))

    -- mod-button2, Raise the window to the top of the stack
    , ((modMask, button2),
       (\w -> focus w >> windows W.swapMaster))

    -- mod-button3, Set the window to floating mode and resize by dragging
    , ((modMask, button3),
       (\w -> focus w >> mouseResizeWindow w))

    -- you may also bind events to the mouse scroll wheel (button4 and button5)
  ]

这非常有用,但有时我想将window重新插入平铺布局。 XMonad 中是否有执行此操作的机制?一些函数 funcThatInsertWindowBack:

((modMask .|. shiftMask, button1),
     (\w -> focus w >> funcThatInsertWindowBack w))

标准配置已经有这个绑定:

((modMask, xK_t), withFocused $ windows . W.sink)