From 064352bdda2ce311772516fcd0c3394c33aa674d Mon Sep 17 00:00:00 2001
From: Matthias Schiffer <mschiffer@universe-factory.net>
Date: Mon, 28 Feb 2011 22:56:39 +0100
Subject: Allow regrouping processes

---
 xmonad.hs | 1 +
 1 file changed, 1 insertion(+)

(limited to 'xmonad.hs')

diff --git a/xmonad.hs b/xmonad.hs
index 57969b6..f458ad4 100644
--- a/xmonad.hs
+++ b/xmonad.hs
@@ -48,6 +48,7 @@ main = xmonad $ gnomeConfig
        , ("M-<F3>", viewOrWarp 2)
        , ("M-b", banishScreen LowerRight)
        , ("M-p", spawnOnCurrent "exe=`dmenu_path | /home/neoraider/bin/dmemu -b` && eval \"exec $exe\"")
+       , ("M-g", gets (W.currentTag . windowset) >>= regroupProcess)
        ]
        ++ [ (("M-" ++ show n, windows $ W.greedyView ws)) | (ws, n) <- zip myWorkspaces ([1..9]++[0])]
        ++ [ (("M-S-" ++ show n, shiftGroup ws)) | (ws, n) <- zip myWorkspaces ([1..9]++[0])]
-- 
cgit v1.2.3