summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authortv <tv@krebsco.de>2023-01-18 21:20:08 +0100
committertv <tv@krebsco.de>2023-01-19 14:08:27 +0100
commita8cb1328737926cf948d1a7dfbdfd6eff35428d9 (patch)
treec37787859f75cf1442b389be2af8f15a274b2b45
parent9a7e3bf96250d9f9090d4eebac18240f54167a84 (diff)
tv xmonad: add ewmh
-rw-r--r--tv/5pkgs/haskell/xmonad-tv/src/main.hs3
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"