diff options
author | Azat Bahawi <azahi@teknik.io> | 2021-11-22 00:46:38 +0300 |
---|---|---|
committer | Azat Bahawi <azahi@teknik.io> | 2021-11-22 00:46:38 +0300 |
commit | 49f1d6b3acece70f886e3d52f7a8cb336b7f3f63 (patch) | |
tree | 9dd71b3db9df8b6c0d26a6e2d2e68cb3048df341 /src/Main.hs | |
parent | Whoops (diff) |
Making progress
Diffstat (limited to 'src/Main.hs')
-rw-r--r-- | src/Main.hs | 32 |
1 files changed, 25 insertions, 7 deletions
diff --git a/src/Main.hs b/src/Main.hs index 23514e1..74b63a1 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -5,13 +5,31 @@ -- Maintainer : Azat Bahawi <azahi@teknik.io> -- Stability : unstable -- Portability : unportable --- module Main where -import XMonad -import XMonad.Actions.DynamicProjects -import XMonad.Actions.Navigation2D +import XMonad ( Default(def) + , XConfig + ( borderWidth + , clickJustFocuses + , focusFollowsMouse + , focusedBorderColor + , handleEventHook + , keys + , layoutHook + , logHook + , manageHook + , modMask + , mouseBindings + , normalBorderColor + , startupHook + , terminal + , workspaces + ) + , xmonad + ) +import XMonad.Actions.DynamicProjects ( dynamicProjects ) +import XMonad.Actions.Navigation2D ( withNavigation2DConfig ) import qualified XMonad.Custom.Bindings as C import qualified XMonad.Custom.Event as C import qualified XMonad.Custom.Layout as C @@ -23,9 +41,9 @@ import qualified XMonad.Custom.Projects as C import qualified XMonad.Custom.Startup as C import qualified XMonad.Custom.Theme as C import qualified XMonad.Custom.Workspaces as C -import XMonad.Hooks.EwmhDesktops -import XMonad.Hooks.ManageDocks -import XMonad.Layout.Fullscreen +import XMonad.Hooks.EwmhDesktops ( ewmh ) +import XMonad.Hooks.ManageDocks ( docks ) +import XMonad.Layout.Fullscreen ( fullscreenSupport ) main :: IO () main = |