Ability to name new tags

[etc/awesome.git] / .config / awesome / taghelpers.lua

diff --git a/.config/awesome/taghelpers.lua b/.config/awesome/taghelpers.lua
index 147a9e9736090dc40f6c14ceeb86ac6135b78c73..39f26f416575d6ef9564d0dd251fb34e303926ec 100644 (file)
--- a/.config/awesome/taghelpers.lua
+++ b/.config/awesome/taghelpers.lua
@@ -52,13 +52,14 @@ function module.rename_tag()
     }
 end
 
     }
 end
 

-function module.move_to_new_tag(clnt, properties, volatile, switchto, force)
+function module.move_to_new_tag(clnt, name, properties, volatile, switchto, force)

     local c = clnt or client.focus
     if not c then return end
 
     local c = clnt or client.focus
     if not c then return end
 

+    local n = name or c.class

     local p = (type(properties) == "table" and properties) or {}
     local s = p.screen or c.screen
     local p = (type(properties) == "table" and properties) or {}
     local s = p.screen or c.screen

-    local t = module.add_tag(c.class, gears.table.join(p, {
+    local t = module.add_tag(n, gears.table.join(p, {

         screen = s,
         volatile = volatile,
     }), switchto, force)
         screen = s,
         volatile = volatile,
     }), switchto, force)