bindings: add bindings for moving clients between adjacent desktop pages

1 files changed, 10 insertions, 0 deletions

diff --git a/workspace.lua b/workspace.lua
index f0a6dcc..cb0eff1 100644
--- a/workspace.lua
+++ b/workspace.lua
@@ -157,6 +157,16 @@ function Workspace:move_client(client, desk, page)
     awful.client.movetotag(dst_page, client)
 end
 
+function Workspace:client_move_relative(client, offset)
+    local state  = self.screen_state[mouse.screen]
+    if state then
+        local desk = state.desktop_idx
+        local page = 1 + ((state.page_idx - 1 + offset) % #self.desktops[desk].pages)
+
+        self:move_client(client, desk, page)
+    end
+end
+
 function Workspace:new(layouts)
     local o = setmetatable({}, self)
     self.__index = self