xmonad-tv: StateFull -> focusTracking Full

1 files changed, 2 insertions, 2 deletions

diff --git a/pkgs/haskell/xmonad-tv/src/main.hs b/pkgs/haskell/xmonad-tv/src/main.hs
index a747a04..a3735a8 100644
--- a/pkgs/haskell/xmonad-tv/src/main.hs
+++ b/pkgs/haskell/xmonad-tv/src/main.hs
@@ -24,10 +24,10 @@ import System.Posix.Process (executeFile)
 import XMonad.Actions.DynamicWorkspaces (removeEmptyWorkspace)
 import XMonad.Actions.CycleWS (toggleWS)
 import XMonad.Layout.Gaps (Direction2D(U,R,D,L), gaps)
+import XMonad.Layout.FocusTracking (focusTracking)
 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.StackSet as W
 import Data.Map (Map)
 import qualified Data.Map as Map
@@ -109,7 +109,7 @@ mainNoArgs = do
                     (myMasterWidth + 2 * fromIntegral (borderWidth def) / fromIntegral myScreenWidth)
                     []
                   |||
-                  StateFull
+                  focusTracking Full
             , manageHook =
                 composeAll
                   [ appName =? "fzmenu-urxvt" --> doCenterFloat