Untitled
🧩 Syntax:
XMonad will use ghc to recompile, because neither "/home/brian/.xmonad/build" nor "/home/brian/.xmonad/stack.yaml" exists.
XMonad recompiling (forced).
Errors detected while compiling xmonad config: /home/brian/.xmonad/xmonad.hs
$ ghc --make xmonad.hs -i -ilib -fforce-recomp -main-is main -v0 -outputdir /home/brian/.xmonad/build-x86_64-linux -o /home/brian/.xmonad/xmonad-x86_64-linux
xmonad.hs:47:3: error:
• Couldn't match expected type: [((KeyMask, KeySym), X ())]
with actual type: XConfig
(PerScreen
(Choose
Tall
(XMonad.Layout.LayoutModifier.ModifiedLayout
WithBorder Full))
(Choose
(Mirror MultiCol)
(XMonad.Layout.LayoutModifier.ModifiedLayout
WithBorder Full)))
• In the first argument of ‘(++)’, namely
‘def
{layoutHook = myLayout, focusedBorderColor = "#a6a6a6",
logHook = updatePointer (0.5, 0.5) (0, 0),
normalBorderColor = "#474747", modMask = mod4Mask,
startupHook = myStartupHook, terminal = "kitty", keys = myKeys}
`additionalKeys`
[((mod4Mask, xK_z), spawn "bash -i -c 'maim-active'"),
((mod4Mask .|. controlMask, xK_z),
spawn "bash -i -c 'maim-select'"),
((mod4Mask, xK_s), W.windowPrompt myXPConfig W.Goto W.allWindows),
((mod4Mask, xK_r), runOrRaisePrompt myXPConfig), ....]
`additionalMouseBindings`
[((mod4Mask, button4),
\ w -> planeMove (Lines 4) Circular ToRight),
((mod4Mask, button5), \ w -> planeMove (Lines 4) Circular ToLeft),
((mod4Mask .|. mod1Mask, button4),
\ w -> catchX (planeMove (Lines 4) Circular ToUp) (return ())),
((mod4Mask .|. mod1Mask, button5),
\ w -> catchX (planeMove (Lines 4) Circular ToDown) (return ()))]’
In the expression:
def
{layoutHook = myLayout, focusedBorderColor = "#a6a6a6",
logHook = updatePointer (0.5, 0.5) (0, 0),
normalBorderColor = "#474747", modMask = mod4Mask,
startupHook = myStartupHook, terminal = "kitty", keys = myKeys}
`additionalKeys`
[((mod4Mask, xK_z), spawn "bash -i -c 'maim-active'"),
((mod4Mask .|. controlMask, xK_z),
spawn "bash -i -c 'maim-select'"),
((mod4Mask, xK_s), W.windowPrompt myXPConfig W.Goto W.allWindows),
((mod4Mask, xK_r), runOrRaisePrompt myXPConfig), ....]
`additionalMouseBindings`
[((mod4Mask, button4),
\ w -> planeMove (Lines 4) Circular ToRight),
((mod4Mask, button5), \ w -> planeMove (Lines 4) Circular ToLeft),
((mod4Mask .|. mod1Mask, button4),
\ w -> catchX (planeMove (Lines 4) Circular ToUp) (return ())),
((mod4Mask .|. mod1Mask, button5),
\ w -> catchX (planeMove (Lines 4) Circular ToDown) (return ()))]
++
zip
(zip (repeat (mod4Mask .|. controlMask)) [xK_1 .. xK_9])
(map (setWorkspaceIndex) [1 .. ])
++
zip
(zip (repeat (mod4Mask)) [xK_1 .. xK_9])
(map (withWorkspaceIndex S.greedyView) [1 .. ])
In an equation for ‘myXConfig’:
myXConfig
= def
{layoutHook = myLayout, focusedBorderColor = "#a6a6a6",
logHook = updatePointer (0.5, 0.5) (0, 0),
normalBorderColor = "#474747", modMask = mod4Mask,
startupHook = myStartupHook, terminal = "kitty", keys = myKeys}
`additionalKeys`
[((mod4Mask, xK_z), spawn "bash -i -c 'maim-active'"),
((mod4Mask .|. controlMask, xK_z),
spawn "bash -i -c 'maim-select'"),
((mod4Mask, xK_s), W.windowPrompt myXPConfig W.Goto W.allWindows),
....]
`additionalMouseBindings`
[((mod4Mask, button4),
\ w -> planeMove (Lines 4) Circular ToRight),
((mod4Mask, button5), \ w -> planeMove (Lines 4) Circular ToLeft),
((mod4Mask .|. mod1Mask, button4),
\ w -> catchX (planeMove (Lines 4) Circular ToUp) (return ())),
....]
++
zip
(zip (repeat (mod4Mask .|. controlMask)) [xK_1 .. xK_9])
(map (setWorkspaceIndex) [1 .. ])
++
zip
(zip (repeat (mod4Mask)) [xK_1 .. xK_9])
(map (withWorkspaceIndex S.greedyView) [1 .. ])
|
47 | def {
| ^^^^^...
xmonad.hs:81:24: error:
• Couldn't match expected type: XConfig l0
with actual type: [((KeyMask, KeySym), X ())]
• In the second argument of ‘($)’, namely ‘myXConfig’
In the expression: xmonad . ewmh $ myXConfig
In an equation for ‘main’: main = xmonad . ewmh $ myXConfig
|
81 | main = xmonad . ewmh $ myXConfig
| ^^^^^^^^^
Please check the file for errors.
xmonad: xmessage: executeFile: does not exist (No such file or directory)