import XMonad
import XMonad.Layout
import XMonad.Layout.NoBorders
import XMonad.Hooks.EwmhDesktops
import XMonad.Hooks.ManageDocks
import XMonad.Util.EZConfig
import XMonad.Hooks.ManageHelpers
myDefault = ewmh defaultConfig
myManageHooks = composeAll
[ appName =? "panel" --> doIgnore
, appName =? "galculator" --> doFloat
, manageDocks
, isFullscreen --> doFullFloat
]
main = xmonad $ myDefault
{ borderWidth = 1
, manageHook = myManageHooks <+> manageHook myDefault
, terminal = "sakura"
, layoutHook = avoidStruts $ smartBorders (layoutHook myDefault)
, handleEventHook = docksEventHook <+> fullscreenEventHook <+> ewmhDesktopsEventHook <+> handleEventHook myDefault }
`additionalKeysP`
[ ("M-b", sendMessage ToggleStruts)
, ("M-C-l", spawn "slock")
]