From 7f9c87384e8cd7244eca3afcfa981043ca842a18 Mon Sep 17 00:00:00 2001
From: Spencer Janssen <spencerjanssen@gmail.com>
Date: Thu, 19 Feb 2009 05:20:40 +0100
Subject: Use doShift in my config
Ignore-this: 1f103d21bbceec8d48384f975f18eaec
darcs-hash:20090219042040-25a6b-5fe1645b8199acc5e659d491bf308eedacb686b1.gz
---
XMonad/Config/Sjanssen.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
(limited to 'XMonad/Config')
diff --git a/XMonad/Config/Sjanssen.hs b/XMonad/Config/Sjanssen.hs
index 4c10c49..3c0689b 100644
--- a/XMonad/Config/Sjanssen.hs
+++ b/XMonad/Config/Sjanssen.hs
@@ -35,7 +35,7 @@ sjanssenConfig = do
, keys = \c -> mykeys sp c `M.union` keys defaultConfig c
, layoutHook = modifiers layouts
, logHook = ewmhDesktopsLogHook
- , manageHook = composeAll [className =? x --> doF (W.shift w)
+ , manageHook = composeAll [className =? x --> doShift w
| (x, w) <- [ ("Firefox", "web")
, ("Ktorrent", "7")
, ("Amarokapp", "7")]]
--
cgit v1.2.3