xmonad config!

gistfile1.txt

import XMonad
import XMonad.Util.EZConfig(additionalKeys)
import qualified XMonad.StackSet as W
import System.IO
import XMonad.Hooks.DynamicLog

-- +! scrot on printScreen

myManageHook = composeAll
    [ className =? "MPlayer"           --> doFloat
    , className =? "Chromium-browser"  --> moveTo "7"
    , className =? "jetbrains-pycharm" --> moveTo "1"
    ]
      where moveTo = doF . W.shift


main = xmonad $ defaultConfig {
			modMask           = mod4Mask,
            normalBorderColor = "black", 
            terminal = "gnome-terminal",
            manageHook = myManageHook
		} `additionalKeys` 
        [ 
          ((controlMask, xK_F1), windows $ W.view "1"),
          ((controlMask, xK_F2), windows $ W.view "2"),
          ((controlMask, xK_F3), windows $ W.view "3"),
          ((controlMask, xK_F4), windows $ W.view "4"),
          ((controlMask, xK_F5), windows $ W.view "5"),
          ((controlMask, xK_F6), windows $ W.view "6"),
          ((controlMask, xK_F7), windows $ W.view "7"),
          ((controlMask, xK_F8), windows $ W.view "8")
        ]