From a25f2c86a839a839587f21f7c85125e1043ad9fc Mon Sep 17 00:00:00 2001
From: Daniel Borchmann <daniel@algebra20.de>
Date: Sat, 2 Feb 2019 11:31:16 +0100
Subject: [PATCH] Add delimiter in taffybar between clock and workspaces

---
 taffybar/taffybar.hs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/taffybar/taffybar.hs b/taffybar/taffybar.hs
index 7da5b67..806e3bd 100644
--- a/taffybar/taffybar.hs
+++ b/taffybar/taffybar.hs
@@ -82,7 +82,10 @@ main = do
          Gtk.toWidget label :: TaffyIO Gtk.Widget
       myConfig = defaultSimpleTaffyConfig
         { startWidgets =
-            (clock >>= buildContentsBox) : workspaces : map (>>= buildContentsBox) [ layout, bar, commandRunnerNew 1.0 "emacs-current-task" [] "…", bar, windows ]
+            (clock >>= buildContentsBox)
+            : (bar >>= buildContentsBox)
+            : workspaces
+            : map (>>= buildContentsBox) [ layout, bar, commandRunnerNew 1.0 "emacs-current-task" [] "…", bar, windows ]
         , endWidgets = map (>>= buildContentsBox)
           [ textBatteryNew "$percentage$% ($status$)"
           , tray