diff options
| author | Josh Rahm <rahm@google.com> | 2023-12-08 16:13:24 -0700 |
|---|---|---|
| committer | Josh Rahm <rahm@google.com> | 2023-12-08 16:13:24 -0700 |
| commit | 9f176adbff807dafec2caee5e3b104e65caf9029 (patch) | |
| tree | 8d31ec2a97dd0ae880e2a5e3a2c29b8331d22976 /src/Rahm/Desktop/Layout.hs | |
| parent | 33879cd90b0dd488540f7526d3eceab152a23d0f (diff) | |
| download | rde-pinwindow.tar.gz rde-pinwindow.tar.bz2 rde-pinwindow.zip | |
Got the pin window layout to work. It works better than the main branch for now except the border color does not change.pinwindow
Diffstat (limited to 'src/Rahm/Desktop/Layout.hs')
| -rw-r--r-- | src/Rahm/Desktop/Layout.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/Rahm/Desktop/Layout.hs b/src/Rahm/Desktop/Layout.hs index f6fb49e..4dfba25 100644 --- a/src/Rahm/Desktop/Layout.hs +++ b/src/Rahm/Desktop/Layout.hs @@ -18,7 +18,7 @@ import Rahm.Desktop.Layout.List nil, (|:), ) -import Rahm.Desktop.Layout.PinWindow (PinWindowLayout (PinWindowLayout)) +import Rahm.Desktop.Layout.PinWindow (PinWindowLayout (PinWindowLayout), pinnable) import Rahm.Desktop.Layout.Pop (poppable) import Rahm.Desktop.Layout.Redescribe (Describer (..), Redescribe (..)) import Rahm.Desktop.Layout.ReinterpretMessage (DoReinterpret (..), ReinterpretMessage (..)) @@ -42,14 +42,13 @@ import XMonad.Layout.Spiral (spiral) myLayout = fullscreenFull $ - PinWindowLayout $ hole $ avoidStruts myLayoutList mySpacing = spacingRaw True (Border 5 5 5 5) True (Border 5 5 5 5) True mods = - mySpacing . poppable . flippable . rotateable + pinnable . poppable . mySpacing . flippable . rotateable myLayoutList = layoutList $ |