xmonad.hs-without-perworkpace-module

....
--import XMonad.Layout.PerWorkspace
....
....
...
--myLayoutHook =  onWorkspace (myWorkspaces !! 1) (avoidStruts (imGHLayout) ||| fullscreen)	-- for google hangouts
--		$ onWorkspaces [(myWorkspaces !! 3),(myWorkspaces !! 6)] (avoidStruts (tabLayout) ||| fullscreen)
--		$ onWorkspace (myWorkspaces !! 7) (avoidStruts (gimpLayout) ||| fullscreen)	-- gimp for fullscreen must have focus on center
--		$ onWorkspace (myWorkspaces !! 8) (avoidStruts (imLayout) ||| fullscreen)	-- for pidgin
--	   	$ avoidStruts (standardLayouts) ||| fullscreen
myLayoutHook = avoidStruts $ standardLayouts ||| fullscreen
	where
		standardLayouts	= named "+" (spacing myBorderSpace $ Grid)
				||| named "[]-" (spacing 1 $ Tall 1 (3/100) (1/2))	-- Note extra ()
				||| named "TT"	(spacing myBorderSpace $ Mirror (Tall 1 (3/100) (1/2)))
		fullscreen	= named "[_]" (noBorders (fullscreenFull Full))
		tabLayout 	= named "TB" simpleTabbed
				||| standardLayouts
		--imLayout 	= withIM (18/100) (Title "Buddy List") standardLayouts
		--imGHLayout 	= withIM (18/100) (Title "Hangouts") standardLayouts
		--imGHLayout 	= withIM (18/100) (Role "pop-up") standardLayouts
		--gimpLayout 	= withIM (0.130) (Role "gimp-toolbox") $ reflectHoriz $ withIM (0.2) (Role "gimp-dock") standardLayouts
...
...