aboutsummaryrefslogtreecommitdiff
path: root/config/xmonad
diff options
context:
space:
mode:
authorCharles Cabergs <me@cacharle.xyz>2023-02-25 23:58:36 +0100
committerCharles Cabergs <me@cacharle.xyz>2023-02-25 23:58:36 +0100
commit74f99fdc52d797a85b3cdab351dd6f607e08bb6d (patch)
tree7ae017f2d17ffe1b23c4939ccb3bbccc027bdd06 /config/xmonad
parentc32956aee1a62ad706eec215f6d060fbf16ec253 (diff)
downloaddotfiles-74f99fdc52d797a85b3cdab351dd6f607e08bb6d.tar.gz
dotfiles-74f99fdc52d797a85b3cdab351dd6f607e08bb6d.tar.bz2
dotfiles-74f99fdc52d797a85b3cdab351dd6f607e08bb6d.zip
Added ultra wide screen config to xmonad
Diffstat (limited to 'config/xmonad')
-rw-r--r--config/xmonad/xmonad.hs13
1 files changed, 12 insertions, 1 deletions
diff --git a/config/xmonad/xmonad.hs b/config/xmonad/xmonad.hs
index 9337c46..699d679 100644
--- a/config/xmonad/xmonad.hs
+++ b/config/xmonad/xmonad.hs
@@ -17,12 +17,19 @@ import XMonad.Layout.NoBorders (noBorders)
import XMonad.Layout.Reflect (reflectHoriz)
import XMonad.Layout.Spacing (Border (..), spacingRaw)
import XMonad.Layout.Grid (Grid (..))
+import XMonad.Layout.ThreeColumns (ThreeCol (ThreeColMid))
+import XMonad.Layout.CenteredIfSingle (centeredIfSingle)
-- Hooks
import XMonad.Hooks.InsertPosition (Focus (..), Position (..),
insertPosition)
import XMonad.Hooks.WindowSwallowing
+-- TODO: no weird screen layout
+-- put 2 window in master next to each other and the rest in a stack as usual
+import XMonad.Layout.LayoutScreens
+import XMonad.Layout.TwoPane
+
myTerminal = "alacritty"
@@ -43,11 +50,13 @@ main = xmonad $ desktopConfig
} `additionalKeysP` keys'
-layoutHook' = spacing' 4 $ reflectHoriz tiledVerticalBigMaster -- main monitor is slighly to the left
+layoutHook' = spacing' 4 $ centeredIfSingle (1/2) (95/100) (ThreeColMid 1 (3/100) (1/2))
+ ||| reflectHoriz tiledVerticalBigMaster -- main monitor is slighly to the left
||| tiledVerticalBigMaster -- bigger master for code and smaller slave for compiling
||| noBorders Full -- disable borders for fullscreen layout
||| Mirror tiledHorizontalEven -- 50/50 horizontal split
||| Grid
+ -- ||| layoutScreens 2 (TwoPane 0.5 0.5)
where tiledVerticalBigMaster = Tall 1 (3 / 100) (3 / 5)
tiledHorizontalEven = Tall 1 (3 / 100) (1 / 2)
spacing' x = spacingRaw True (Border x x x x) False (Border x x x x) True
@@ -64,6 +73,8 @@ keys' = [ ("<XF86AudioLowerVolume>", spawn "pulseaudio-ctl down")
, ("<XF86AudioMute>", spawn "pulseaudio-ctl mute")
, ("M--", spawn "pulseaudio-ctl down")
, ("M-=", spawn "pulseaudio-ctl up")
+ , ("M-g", layoutSplitScreen 2 (TwoPane 0.5 0.5))
+ , ("M-f", rescreen)
, ("<XF86MonBrightnessUp>", spawn "backlight-ctl up")
, ("<XF86MonBrightnessDown>", spawn "backlight-ctl down")