From 45b9fc9d3e531ebba3dac5a6266d9026e3c0e1aa Mon Sep 17 00:00:00 2001
From: nojhan <nojhan@gmail.com>
Date: Fri, 22 Jun 2012 15:49:00 +0200
Subject: [PATCH] do shift some apps to the first desktop

---
 xmonad.hs | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/xmonad.hs b/xmonad.hs
index 9c83c86..a841576 100644
--- a/xmonad.hs
+++ b/xmonad.hs
@@ -54,7 +54,14 @@ main = xmonad $ gnomeConfig
         , borderWidth = 3
         -- Switch workspaces with default first azerty row instead of plain numbers
         , keys = \c -> bepoKeys c `M.union` keys gnomeConfig c
-        , manageHook = manageHook gnomeConfig <+> manageScratchPad <+> composeAll [ className =? "Gimp"      --> doFloat ]
+        , manageHook = manageHook gnomeConfig <+> manageScratchPad <+> composeAll 
+            [
+                className =? "Thunderbird" --> doShift "1",
+                className =? "Xchat"       --> doShift "1",
+                className =? "Pidgin"      --> doShift "1",
+                className =? "Fdclock" --> doShift "1",
+                className =? "Gimp"        --> doFloat
+            ]
 
         -- add a fullscreen tabbed layout that does not avoid covering
         -- up desktop panels before the desktop layouts