don't float scratchPads and replace deprecated defaultConfig

This commit is contained in:
Felix Van der Jeugt 2016-01-19 08:59:36 +01:00
parent 62ed4c5afd
commit 3d1af17a52
1 changed files with 5 additions and 6 deletions

View File

@ -108,13 +108,12 @@ myFocusedBorderColor = "#ff0000"
myScratchPads :: [NamedScratchpad] myScratchPads :: [NamedScratchpad]
myScratchPads = myScratchPads =
[ interm "ranger" nonFloating [ interm "ranger" nonFloating
, interm "weechat" centerFloating , interm "weechat" nonFloating
, interm "sup" centerFloating , interm "sup" nonFloating
, interm "newsbeuter" centerFloating , interm "newsbeuter" nonFloating
, interm "vimus" centerFloating , interm "vimus" nonFloating
] ]
where where
centerFloating = customFloating $ W.RationalRect 0.05 0.05 0.9 0.9 -- x, y, w, h
interm prog = NS prog (runInTerminal prog prog) (appName =? prog) interm prog = NS prog (runInTerminal prog prog) (appName =? prog)
@ -381,7 +380,7 @@ main = xmonad =<< withBar defaults
-- --
-- No need to modify this. -- No need to modify this.
-- --
defaults = defaultConfig { defaults = def {
-- simple stuff -- simple stuff
terminal = myTerminal, terminal = myTerminal,
focusFollowsMouse = myFocusFollowsMouse, focusFollowsMouse = myFocusFollowsMouse,