diff options
| author | Josh Rahm <rahm@google.com> | 2025-03-06 00:52:26 -0700 |
|---|---|---|
| committer | Josh Rahm <rahm@google.com> | 2025-03-06 00:52:26 -0700 |
| commit | c31124dfaa8a337e9fe16c43666482da2ca69984 (patch) | |
| tree | 2c437201fb1861a3ba90d8f9a62f609932e4e83a /src/Rahm/Desktop/Layout.hs | |
| parent | 95c5aaf46dfb469d6cebeb80e67563aad2cf470e (diff) | |
| download | rde-c31124dfaa8a337e9fe16c43666482da2ca69984.tar.gz rde-c31124dfaa8a337e9fe16c43666482da2ca69984.tar.bz2 rde-c31124dfaa8a337e9fe16c43666482da2ca69984.zip | |
Implement basic screen corners.
It would be really cool to integrate screen corners with the binding
DSL, but that requires extra thought.
Diffstat (limited to 'src/Rahm/Desktop/Layout.hs')
| -rw-r--r-- | src/Rahm/Desktop/Layout.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Rahm/Desktop/Layout.hs b/src/Rahm/Desktop/Layout.hs index 12658a9..4d2b4ea 100644 --- a/src/Rahm/Desktop/Layout.hs +++ b/src/Rahm/Desktop/Layout.hs @@ -10,6 +10,7 @@ import Rahm.Desktop.Layout.ConsistentMosaic expandPositionAlt, shrinkPositionAlt, ) +import Rahm.Desktop.Layout.Explode (explodeable) import Rahm.Desktop.Layout.Flip (flippable) import Rahm.Desktop.Layout.Hole (hole) import Rahm.Desktop.Layout.List @@ -32,6 +33,7 @@ import XMonad fromMessage, ) import XMonad.Hooks.ManageDocks (avoidStruts) +import XMonad.Hooks.ScreenCorners (screenCornerLayoutHook) import XMonad.Layout.Fullscreen (fullscreenFull) import XMonad.Layout.LayoutModifier (ModifiedLayout (..)) import XMonad.Layout.MosaicAlt @@ -39,9 +41,9 @@ import XMonad.Layout.MosaicAlt ) import XMonad.Layout.Spacing (Border (..), spacingRaw) import XMonad.Layout.Spiral (spiral) -import Rahm.Desktop.Layout.Explode (explodeable) myLayout = + screenCornerLayoutHook $ fullscreenFull $ hole $ pinnable $ |