X-Git-Url: https://git.madduck.net/etc/awesome.git/blobdiff_plain/622a3581dd721476cecce4f267737b8034d2b676..88b5c74a5936dce171a0a2723d45adfcd2f4368d:/util/init.lua

diff --git a/util/init.lua b/util/init.lua
index 06db0d4..cd1ac5d 100644
--- a/util/init.lua
+++ b/util/init.lua
@@ -38,10 +38,7 @@ function util.menu_clients_current_tags(menu, args)
     -- Final list of menu items.
     local cls_t = {}
 
-    if cls_tags == nil
-    then
-        return nil
-    end
+    if cls_tags == nil then return nil end
 
     -- For each selected tag get all clients of that tag and add them to
     -- the menu. A click on a menu item will raise that client.
@@ -63,17 +60,11 @@ function util.menu_clients_current_tags(menu, args)
     end
 
     -- No clients? Then quit.
-    if #cls_t <= 0
-    then
-        return nil
-    end
+    if #cls_t <= 0 then return nil end
 
     -- menu may contain some predefined values, otherwise start with a
     -- fresh menu.
-    if not menu
-    then
-        menu = {}
-    end
+    if not menu then menu = {} end
 
     -- Set the list of items and show the menu.
     menu.items = cls_t
@@ -191,6 +182,18 @@ function util.rename_tag(mypromptbox)
     end)
 end
 
+-- Move current tag
+-- pos in {-1, 1} <-> {previous, next} tag position
+function util.move_tag(pos)
+    local tag = awful.tag.selected(mouse.screen)
+    local idx = awful.tag.getidx(tag)
+    if tonumber(pos) <= -1 then
+        awful.tag.move(idx - 1, tag)
+    else
+        awful.tag.move(idx + 1, tag)
+    end
+end
+
 -- Delete current tag (if empty)
 -- Any rule set on the tag shall be broken
 function util.remove_tag()