From ac3b8212a68052f99eba2bd74a2dd8aa9ca2dcb2 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Sat, 1 Oct 2022 02:58:23 +0100
Subject: a couple of superfluous IO usages removed

---
 src/Xmobar/Text/Loop.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Xmobar/Text/Loop.hs')

diff --git a/src/Xmobar/Text/Loop.hs b/src/Xmobar/Text/Loop.hs
index 05379cd..5d2c43f 100644
--- a/src/Xmobar/Text/Loop.hs
+++ b/src/Xmobar/Text/Loop.hs
@@ -45,4 +45,4 @@ eventLoop cfg signal tv = do
 updateString :: Config -> TVar [String] -> IO String
 updateString conf v = do
   s <- readTVarIO v
-  format conf (concat s)
+  return $ format conf (concat s)
-- 
cgit v1.2.3