From b0e3b4402bb46f8fad14f6c06106677968d28554 Mon Sep 17 00:00:00 2001
From: Azat Bahawi <azahi@teknik.io>
Date: Sun, 26 Jul 2020 16:57:46 +0300
Subject: Revert xmobar behaviour

---
 src/XMonad/Custom/Startup.hs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'src/XMonad/Custom/Startup.hs')

diff --git a/src/XMonad/Custom/Startup.hs b/src/XMonad/Custom/Startup.hs
index 85d52ad..aa9340f 100644
--- a/src/XMonad/Custom/Startup.hs
+++ b/src/XMonad/Custom/Startup.hs
@@ -18,7 +18,6 @@ import           XMonad.Hooks.ManageDocks
 import           XMonad.Hooks.SetWMName
 import           XMonad.Util.Cursor
 import           XMonad.Util.SpawnNamedPipe
-import           XMonad.Util.SpawnOnce
 
 atomsToFullscreen :: [String]
 atomsToFullscreen =
@@ -50,7 +49,7 @@ addEWMHFullscreen = do
 startupHook :: X ()
 startupHook = do
     spawnNamedPipe "xmobar ~/.xmonad/xmobarrc/top.hs" "xmobarTop"
-    spawnOnce "xmobar ~/.xmonad/xmobarrc/bot.hs"
+    spawnNamedPipe "xmobar ~/.xmonad/xmobarrc/bot.hs" "xmobarBot"
     docksStartupHook
     addEWMHFullscreen
     setDefaultCursor xC_left_ptr
-- 
cgit 1.4.1