diff options
author | David Roundy <droundy@darcs.net> | 2007-11-11 01:56:29 +0100 |
---|---|---|
committer | David Roundy <droundy@darcs.net> | 2007-11-11 01:56:29 +0100 |
commit | 970ea52bb7d2379390b3acdb03a8e2fa2e923ccb (patch) | |
tree | 004bac35e23c75ad0e5bdff4b0f65a1c076644c4 /XMonad/Config/Sjanssen.hs | |
parent | 3e6325d478daa289c2247cc317f1e9ac87fbc7aa (diff) | |
download | XMonadContrib-970ea52bb7d2379390b3acdb03a8e2fa2e923ccb.tar.gz XMonadContrib-970ea52bb7d2379390b3acdb03a8e2fa2e923ccb.tar.xz XMonadContrib-970ea52bb7d2379390b3acdb03a8e2fa2e923ccb.zip |
changes to work with XConfig of kind * -> *.
darcs-hash:20071111005629-72aca-19e9e88bd2c31a9d5a3bbccbb9a569a8cd8fd2bc.gz
Diffstat (limited to 'XMonad/Config/Sjanssen.hs')
-rw-r--r-- | XMonad/Config/Sjanssen.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/XMonad/Config/Sjanssen.hs b/XMonad/Config/Sjanssen.hs index 1e50df5..40aab8b 100644 --- a/XMonad/Config/Sjanssen.hs +++ b/XMonad/Config/Sjanssen.hs @@ -1,3 +1,4 @@ +{-# OPTIONS_GHC -fno-warn-missing-signatures #-} module XMonad.Config.Sjanssen (sjanssenConfig) where import XMonad @@ -17,7 +18,6 @@ import qualified Data.Map as M import Graphics.X11 import System.IO (hPutStrLn) -sjanssenConfig :: IO XConfig sjanssenConfig = do xmobar <- spawnPipe "xmobar" return $ defaultConfig @@ -31,7 +31,7 @@ sjanssenConfig = do , ((modm, button2), (\w -> focus w >> windows W.swapMaster)) , ((modm.|. shiftMask, button1), (\w -> focus w >> mouseResizeWindow w)) ] , keys = \c -> mykeys c `M.union` keys defaultConfig c - , layoutHook = Layout (smartBorders (tiled ||| Mirror tiled ||| Full ||| tabbed shrinkText defaultTConf)) + , layoutHook = smartBorders (tiled ||| Mirror tiled ||| Full ||| tabbed shrinkText defaultTConf) } where tiled = Tall 1 0.03 0.5 |