Modularised my XMonad Config

1 files changed, 42 insertions, 0 deletions

diff --git a/.config/XMonad/lib/Hooks.hs b/.config/XMonad/lib/Hooks.hs
new file mode 100644
index 0000000..858737d
--- /dev/null
+++ b/.config/XMonad/lib/Hooks.hs
@@ -0,0 +1,42 @@
+module Hooks where
+
+import XMonad
+
+import XMonad.Layout.Spacing
+import XMonad.Layout.WindowNavigation as WN
+import XMonad.Layout.Maximize
+import XMonad.Layout.NoBorders
+
+import XMonad.Layout.BinarySpacePartition as BSP
+import XMonad.Layout.Grid
+import XMonad.Layout.Tabbed
+
+import XMonad.Hooks.SetWMName
+import XMonad.Hooks.ManageDocks
+
+import XMonad.Util.SpawnOnce
+import XMonad.Util.Cursor
+import XMonad.Util.NamedScratchpad
+
+import Defaults
+import Scratchpads
+
+myManageHook = namedScratchpadManageHook myScratchpads
+  <+> manageDocks <+> composeAll [
+    className =? "discord"     --> doShift ( myWorkspaces !! 9 )
+    , className =? "vlc"       --> doShift ( myWorkspaces !! 6 )
+  ]
+
+myLayoutHook = avoidStruts $ maximize $ windowNavigation $ smartBorders $ myGap $ (
+    emptyBSP ||| tabbed shrinkText myTabTheme ||| Grid
+  )
+
+myStartupHook = do
+  spawnOnce "xmodmap /home/zt/.Xmodmap"
+  spawnOnce "picom"
+  spawnOnce "dunst"
+  spawnOnce "polystart"
+  spawnOnce "nitrogen --restore"
+  spawnOnce "cbatticon"
+  setWMName "LG3D"
+  setDefaultCursor xC_left_ptr