feat(wm): install xmonad

xmonad.hs

@@ -0,0 +1,24 @@
+import XMonad
+import XMonad.Util.EZConfig
+import System.Exit
+
+main :: IO ()
+main = xmonad $ myConfig
+myConfig = def
+   `additionalKeysP`
+	[
+	-- Screen lock & suspend
+	("C-M-l"     , spawn "swaylock"							  )
+	, ("C-M-L"     , spawn "swaylock" *> spawn "systemctl suspend")
+	-- Terminal
+	, ("S-<Return>", spawn "kitty"                                )
+	-- Frequent programs
+	, ("S-q",        spawn "firefox"                              )
+	, ("S-a",        spawn "emacs"                                )
+	, ("S-d",        spawn "discord"                              )
+	, ("S-g",        spawn "dolphin"                              )
+	-- Program launcher
+	, ("S-r",        spawn "rofi -show drun -theme Paper"         )
+	-- Exit
+	, ("S-M-C-q",    io (exitWith ExitSuccess)										)
+	]