From 9b6d03d05f2995332403e7d0c2a285ca2a4a24c6 Mon Sep 17 00:00:00 2001
From: Julien Danjou <julien@danjou.info>
Date: Wed, 18 Jun 2008 20:30:53 +0200
Subject: [PATCH] awful: menu supports for C-w

Signed-off-by: Julien Danjou <julien@danjou.info>
---
 awful.lua | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/awful.lua b/awful.lua
index c9eabd0e..b3e16236 100644
--- a/awful.lua
+++ b/awful.lua
@@ -570,6 +570,23 @@ local function menu(args, textbox, exe_callback, completion_callback)
                 cur_pos = 1
             elseif key == "e" then
                 cur_pos = #command + 1
+            elseif key == "w" then
+                local wstart = 1
+                local wend = 1
+                local cword_start = 1
+                local cword_end = 1
+                while wend < cur_pos do
+                    wend = command:find(" ", wstart)
+                    if not wend then wend = #command + 1 end
+                    if cur_pos >= wstart and cur_pos <= wend + 1 then
+                        cword_start = wstart
+                        cword_end = cur_pos - 1
+                        break
+                    end
+                    wstart = wend + 1
+                end
+                command = command:sub(1, cword_start - 1) .. command:sub(cword_end + 1)
+                cur_pos = cword_start
             end
         else
             if completion_callback then