diff options
| author | Spencer Janssen <sjanssen@cse.unl.edu> | 2008-04-30 10:25:36 +0200 |
|---|---|---|
| committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2008-04-30 10:25:36 +0200 |
| commit | ac5ab95e372f33e8f32f5694ce4f73e00056f224 (patch) | |
| tree | 77bd186b4f148f1cda35afa2bdf91deeb004d513 /XMonad/Config/Sjanssen.hs | |
| parent | 02bf462d51dd80cd6329f715a787c1107acc29f9 (diff) | |
| download | XMonadContrib-ac5ab95e372f33e8f32f5694ce4f73e00056f224.tar.gz XMonadContrib-ac5ab95e372f33e8f32f5694ce4f73e00056f224.tar.xz XMonadContrib-ac5ab95e372f33e8f32f5694ce4f73e00056f224.zip | |
manageHooks for my config
darcs-hash:20080430082536-a5988-ba25496fe4399d563cabd3519c828d834ae8b489.gz
Diffstat (limited to 'XMonad/Config/Sjanssen.hs')
| -rw-r--r-- | XMonad/Config/Sjanssen.hs | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/XMonad/Config/Sjanssen.hs b/XMonad/Config/Sjanssen.hs index 38bbaac..e48bd86 100644 --- a/XMonad/Config/Sjanssen.hs +++ b/XMonad/Config/Sjanssen.hs @@ -30,7 +30,10 @@ sjanssenConfig = do , ((modm.|. shiftMask, button1), (\w -> focus w >> mouseResizeWindow w)) ] , keys = \c -> mykeys c `M.union` keys defaultConfig c , layoutHook = avoidStruts $ smartBorders (tiled Tall ||| tiled Wide ||| Full ||| tabbed shrinkText myTheme) - , manageHook = manageHook defaultConfig <+> manageDocks + , manageHook = composeAll [className =? x --> doF (W.shift w) + | (x, w) <- [ ("Firefox", "web"), ("Pidgin", "im") + , ("Ktorrent", "7")]] + <+> manageHook defaultConfig <+> manageDocks } where tiled = HintedTile 1 0.03 0.5 TopLeft |