ninewise/configuration
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

let's fix ranger like this for now

Browse Source
This commit is contained in:
Felix Van der Jeugt 2015-07-02 23:20:44 +02:00
parent 4ad5a84bd4
commit bc5e28723b
1 changed files with 6 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
xmonad/xmonad.hs
View File

@ -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)
------------------------------------------------------------------------