diff options
| -rw-r--r-- | tv/5pkgs/haskell/xmonad-tv/src/main.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tv/5pkgs/haskell/xmonad-tv/src/main.hs b/tv/5pkgs/haskell/xmonad-tv/src/main.hs index 6ac6b6b10..2061ae4b9 100644 --- a/tv/5pkgs/haskell/xmonad-tv/src/main.hs +++ b/tv/5pkgs/haskell/xmonad-tv/src/main.hs @@ -4,6 +4,7 @@ module Main (main) where import System.Exit (exitFailure) +import XMonad.Hooks.EwmhDesktops (ewmh) import Control.Exception import Control.Monad.Extra (whenJustM) @@ -71,7 +72,7 @@ mainNoArgs = do handleShutdownEvent <- newShutdownEventHandler let config = - id + ewmh $ withUrgencyHookC BorderUrgencyHook { urgencyBorderColor = "#ff0000" |