xmonad.hs:56:11: error:
    • Couldn't match type: (KeyMask, KeySym)
                     with: [Char]
      Expected: String
        Actual: (KeyMask, KeySym)
    • In the expression: (m .|. myModMask, k)
      In the expression: ((m .|. myModMask, k), windows $ f i)
      In the second argument of ‘(++)’, namely
        ‘[((m .|. myModMask, k), windows $ f i) |
            (i, k) <- zip myWorkspaces [xK_1 .. xK_9],
            (f, m) <- [(W.greedyView, 0), (W.shift, shiftMask)]]’
   |
56 |         [((m .|. myModMask, k), windows $ f i)
   |           ^^^^^^^^^^^^^^^^^^^^