[XMonad] Don't use do notation for startup hook

This commit is contained in:
Ivan Malison 2016-10-14 14:48:51 -07:00
parent 5d8255e31d
commit 61413af628
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8

View File

@ -48,8 +48,7 @@ layouts = multiCol [1, 1] 2 0.01 (-0.5) ||| Full ||| Tall 1 (3/100) (1/2)
myLayoutHook = avoidStruts . smartSpacing 10 . noBorders . minimize myLayoutHook = avoidStruts . smartSpacing 10 . noBorders . minimize
. boringWindows . mkToggle (MIRROR ?? EOT) $ layouts . boringWindows . mkToggle (MIRROR ?? EOT) $ layouts
myStartup = do myStartup = spawn "systemctl --user start wm.target"
spawn "systemctl --user start wm.target"
addKeys conf@XConfig {modMask = modm} = addKeys conf@XConfig {modMask = modm} =
[ ((modm, xK_p), spawn "rofi -show drun") [ ((modm, xK_p), spawn "rofi -show drun")