diff options
| author | tv <tv@krebsco.de> | 2022-11-27 22:05:55 +0100 |
|---|---|---|
| committer | tv <tv@krebsco.de> | 2023-01-08 13:46:02 +0100 |
| commit | ffa810484c16ffb0a1d1a9f27b77dbcf24212da9 (patch) | |
| tree | f00e47190632ae657178a323ed7e6e82523c3250 /tv | |
| parent | fbd33d19895dac77056af04595c2a22ca7552517 (diff) | |
tv xmonad: Full -> StateFull
Diffstat (limited to 'tv')
| -rw-r--r-- | tv/5pkgs/haskell/xmonad-tv/src/main.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tv/5pkgs/haskell/xmonad-tv/src/main.hs b/tv/5pkgs/haskell/xmonad-tv/src/main.hs index c921d428b..d7c45f189 100644 --- a/tv/5pkgs/haskell/xmonad-tv/src/main.hs +++ b/tv/5pkgs/haskell/xmonad-tv/src/main.hs @@ -1,4 +1,5 @@ {-# LANGUAGE LambdaCase #-} +{-# LANGUAGE PatternSynonyms #-} module Main (main) where @@ -20,6 +21,7 @@ import XMonad.Actions.CycleWS (toggleWS) import XMonad.Layout.NoBorders ( smartBorders ) import XMonad.Layout.ResizableTile (ResizableTall(ResizableTall)) import XMonad.Layout.ResizableTile (MirrorResize(MirrorExpand,MirrorShrink)) +import XMonad.Layout.StateFull (pattern StateFull) import qualified XMonad.Prompt import qualified XMonad.StackSet as W import Data.Map (Map) @@ -67,7 +69,7 @@ mainNoArgs = do (fromIntegral (80 * myTermFontWidth + 2 * (myTermPadding + borderWidth def)) / fromIntegral myScreenWidth) [] ||| - Full + StateFull , manageHook = composeAll [ appName =? "fzmenu-urxvt" --> doCenterFloat |