diff options
Diffstat (limited to 'src/Main.hs')
| -rw-r--r-- | src/Main.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/Main.hs b/src/Main.hs index 507bd43..fa24255 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -67,6 +67,7 @@ import XMonad.Hooks.ManageHelpers (doFullFloat, isFullscreen) import XMonad.Layout.Fullscreen (fullscreenEventHook) import Data.List (isPrefixOf) import Rahm.Desktop.Keys.Wml (wmlLogHook) +import Rahm.Desktop.PinWindow (pinWindowChangeHook, pinWindowBorderUpdate) main = do logHook <- xMobarLogHook @@ -83,7 +84,7 @@ main = do (=<<) X.xmonad $ applyKeys $ - withStackChangeHook historyHook $ + withStackChangeHook (pinWindowChangeHook <> historyHook) $ ewmh $ docks $ def @@ -129,7 +130,7 @@ main = do ], focusFollowsMouse = False, clickJustFocuses = False, - logHook = wmlLogHook >> logHook xmobar + logHook = wmlLogHook >> pinWindowBorderUpdate >> logHook xmobar } -- Should the chrome window float? Returns false if the window's title starts |