1import XMonad
 2
 3import XMonad.Hooks.EwmhDesktops (ewmhFullscreen, ewmh)
 4import XMonad.Hooks.StatusBar (defToggleStrutsKey, withEasySB)
 5
 6import XMonad.Config.LaNinpre
 7    (LayoutNames(..)
 8    , laNinpreConfig
 9    , statusBarConfig
10    )
11
12wsMin = [ "<s>", "<m>", "<p>", "<l>", "<o>", "<t>", "<u>", "<i>", "<a>" ]
13
14layoutNames = LayoutNames "l" "s" "u"
15
16configMin = laNinpreConfig wsMin layoutNames
17
18main = xmonad
19     . ewmhFullscreen
20     . ewmh
21     . withEasySB statusBarConfig defToggleStrutsKey
22     $ configMin