From bc5e28723b1203c2a1e48713086d67604897e312 Mon Sep 17 00:00:00 2001 From: Felix Van der Jeugt Date: Thu, 2 Jul 2015 23:20:44 +0200 Subject: [PATCH] let's fix ranger like this for now --- xmonad/xmonad.hs | 13 ++++++------- 1 file changed, 6 insertions(+), 7 deletions(-) diff --git a/xmonad/xmonad.hs b/xmonad/xmonad.hs index 03c4544..9415f4a 100644 --- a/xmonad/xmonad.hs +++ b/xmonad/xmonad.hs @@ -18,7 +18,6 @@ import XMonad import XMonad.Hooks.DynamicLog -import XMonad.Hooks.ManageHelpers import XMonad.Layout.NoBorders import XMonad.Layout.Grid import XMonad.Util.NamedScratchpad @@ -108,14 +107,14 @@ myFocusedBorderColor = "#ff0000" -- Scratchpads, applications to toggle myScratchPads :: [NamedScratchpad] myScratchPads = - [ interm "ranger" - , interm "weechat" - , interm "sup" - , interm "newsbeuter" + [ interm "ranger" nonFloating + , interm "weechat" centerFloating + , interm "sup" centerFloating + , interm "newsbeuter" centerFloating ] where - placement = doRectFloat $ W.RationalRect 0.05 0.05 0.9 0.9 -- x, y, w, h - interm prog = NS prog (runInTerminal prog prog) (appName =? prog) placement + 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) ------------------------------------------------------------------------