[xmonad] Basic configuration : Config.Gnome + some more keys

[Matthieu Dubuget]

Hello,

I'm a happy user of xmonad since about 1 year.
But I don't know haskell language at all.
(I know: I should learn, but… lack of time, and
also happy OCaml programmer).

My problem:

I just installed a brand new computer. Then xmonad,
and I use it with Gnome.

My xmonad.hs is:

import XMonad
import XMonad.Config.Gnome
main = xmonad gnomeConfig
     { modMask = mod4Mask
     }


I now want to integrate some more key bindings,
but I'm not able to put together all the informations
gathered from the documentation.

Here are the binding I'd like to add:

-- import XMonad.Actions.CycleWS
-- import qualified XMonad.StackSet as S

------------------------------------------------------------------------
-- Key bindings. Add, modify or remove key bindings here.
--
-- myKeys conf =
-- 
--     --
--     -- mod-[1..9], Switch to workspace N
--     -- mod-shift-[1..9], Move client to workspace N
--     --
--     [((modMask, k), windows $ S.greedyView i)
--          | (i, k) <- zip (XMonad.workspaces conf) [xK_F1 .. xK_F9]
--     --     , (f, m) <- [(W.greedyView, 0), (W.shift, shiftMask)]
--     ]
--     ++
--     [ ((modMask,               xK_Left  ), prevWS )
--     , ((modMask,               xK_Right ), nextWS )
--     , ((modMask .|. shiftMask, xK_Left  ), shiftToPrev )
--     , ((modMask .|. shiftMask, xK_Right ), shiftToNext )]


First problem: the last 2 lines have a problem.

    Couldn't match expected type `XConfig l -> KeyMask'
           against inferred type `KeyMask'
    In the second argument of `(.|.)', namely `shiftMask'
    In the expression: modMask .|. shiftMask
    In the expression: (modMask .|. shiftMask, xK_Left)


Second problem: how to integrate myKeys with Config.Gnome bindings ?

Thanks in advance

Matt