dotfiles

commit: 8e99120f1c676acf7e3858d8f7af38b7335669d3
parent: ba9290387b0aa66a53e165d89ea331a2c03dc869
Author: Haelwenn (lanodan) Monnier <contact@hacktivis.me>
Date:   Sat, 16 Sep 2017 13:56:48 +0200

.xmonad/xmonad.hs: Added

Diffstat:
A
.xmonad/xmonad.hs
30
++++++++++++++++++++++++++++++

1 file changed, 30 insertions(+), 0 deletions(-)
diff --git a/.xmonad/xmonad.hs b/.xmonad/xmonad.hs
@@ -0,0 +1,30 @@
+import XMonad
+
+import XMonad.Hooks.DynamicLog
+import XMonad.Hooks.EwmhDesktops
+import XMonad.Hooks.ManageDocks
+
+import XMonad.Layout.Grid
+
+myLayout = avoidStruts (tiled ||| Mirror tiled ||| Grid ||| Full) ||| Full
+	where
+		tiled   = Tall nmaster delta ratio
+		nmaster = 1
+		ratio   = 1/2
+		delta   = 3/100
+
+myManageHook = composeAll
+	[ className =? "QEMU"           --> doFloat]
+
+main = xmonad $ ewmh defaultConfig
+	{ borderWidth        = 0
+--	, normalBorderColor  = "#002b36"
+--	, focusedBorderColor = "#586e75"
+	, focusFollowsMouse  = False
+	, clickJustFocuses   = False
+	, logHook            = dynamicLogString xmobarPP { ppTitle = xmobarColor "green" "" } >>= xmonadPropLog
+	, modMask            = mod4Mask
+	, manageHook         = manageDocks <+> myManageHook
+	, layoutHook         = myLayout
+	, handleEventHook    = handleEventHook defaultConfig <+> fullscreenEventHook <+> docksEventHook
+	, terminal           = "st"}