I will have to search a little more for this part, because the keymap I'm using does not offer direct access to digits: that's why I bind Fn keys.
It compiles, but I have not tested it and I have no clue if its going to work. just copied some examples from config archive, I don't really know what I'm doing ;) import XMonad import XMonad.Actions.CycleWS import XMonad.Config.Gnome import XMonad.Util.EZConfig import qualified XMonad.StackSet as W main = do xmonad $ gnomeConfig { modMask = mod4Mask } `additionalKeysP` (extraKeys gnomeConfig) extraKeys conf = [ ("M-<L>", prevWS) , ("M-<R>", nextWS) , ("M-S-<L>", shiftToPrev) , ("M-S-<R>", shiftToNext) ] ++ [ (m ++ (show k) ++ ">", windows $ f i) | (i, k) <- zip (XMonad.workspaces conf) [1 .. 9] , (f, m) <- [(W.greedyView, "M-<F"), (W.shift, "M-S-<F")] ] Regards, Henrique G. Abreu