Accord with new pattern-match

This commit is contained in:
Vanessa McHale 2020-12-31 20:17:22 -06:00
parent ff738988d3
commit 2a1a18023a

View File

@ -61,7 +61,7 @@ xmonad conf = do
let launch' args = do
catchIO buildLaunch
conf' @ XConfig { layoutHook = Layout l }
conf'@XConfig { layoutHook = Layout l }
<- handleExtraArgs conf args conf{ layoutHook = Layout (layoutHook conf) }
withArgs [] $ launch (conf' { layoutHook = l })