mirror of
https://github.com/xmonad/xmonad-contrib.git
synced 2025-07-31 04:01:51 -07:00
Fixed conflict between X.U.ExtensibleState and X.C.Sjanssen
This commit is contained in:
@@ -20,16 +20,16 @@ import XMonad.Layout.TwoPane
|
||||
|
||||
import qualified Data.Map as M
|
||||
|
||||
sjanssenConfig = do
|
||||
sp <- mkSpawner
|
||||
return . ewmh $ defaultConfig
|
||||
sjanssenConfig =
|
||||
ewmh $ defaultConfig
|
||||
{ terminal = "exec urxvt"
|
||||
, workspaces = ["irc", "web"] ++ map show [3 .. 9 :: Int]
|
||||
, mouseBindings = \(XConfig {modMask = modm}) -> M.fromList $
|
||||
[ ((modm, button1), (\w -> focus w >> mouseMoveWindow w))
|
||||
, ((modm, button2), (\w -> focus w >> windows W.swapMaster))
|
||||
, ((modm.|. shiftMask, button1), (\w -> focus w >> mouseResizeWindow w)) ]
|
||||
, keys = \c -> mykeys sp c `M.union` keys defaultConfig c
|
||||
, keys = \c -> mykeys c `M.union` keys defaultConfig c
|
||||
, logHook = dynamicLogString sjanssenPP >>= xmonadPropLog
|
||||
, layoutHook = modifiers layouts
|
||||
, manageHook = composeAll [className =? x --> doShift w
|
||||
| (x, w) <- [ ("Firefox", "web")
|
||||
|
Reference in New Issue
Block a user