From 9f31a359a794b3f3c5f0403b67755cbb7194e49b Mon Sep 17 00:00:00 2001
From: Sakooooo <78461130+Sakooooo@users.noreply.github.com>
Date: Sun, 23 Jul 2023 15:54:05 +0300
Subject: [PATCH] work now please

---
 config/xmonad/xmonad.hs | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/config/xmonad/xmonad.hs b/config/xmonad/xmonad.hs
index 4732b3ff..43126529 100644
--- a/config/xmonad/xmonad.hs
+++ b/config/xmonad/xmonad.hs
@@ -235,7 +235,8 @@ myEventHook = mempty
 -- Perform an arbitrary action on each internal state change or X event.
 -- See the 'XMonad.Hooks.DynamicLog' extension for examples.
 --
-myLogHook = return ()
+myLogHook :: Handle -> X ()
+myLogHook h = dynamicLogWithPP $ def { ppOutput = hPutStrLn h }
 
 ------------------------------------------------------------------------
 -- Startup hook
@@ -254,8 +255,10 @@ myStartupHook = do
 -- Run xmonad with the settings you specify. No need to modify this.
 --
 main = do 
-  xmproc <- spawnPipe "xmobar"
-  xmonad defaults
+  h <- spawnPipe "xmobar"
+  xmonad defaults {
+      logHook = myLogHook h
+  }
 
 -- A structure containing your configuration settings, overriding
 -- fields in the default config. Any you don't override, will