From 2341457723d681573626d89ec889384c612c585a Mon Sep 17 00:00:00 2001
From: Ivan Malison <IvanMalison@gmail.com>
Date: Mon, 14 Nov 2016 05:49:12 -0600
Subject: [PATCH] [taffybar] Add battery display

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

diff --git a/dotfiles/config/taffybar/taffybar.hs b/dotfiles/config/taffybar/taffybar.hs
index 7334ccb6..2a854d8b 100644
--- a/dotfiles/config/taffybar/taffybar.hs
+++ b/dotfiles/config/taffybar/taffybar.hs
@@ -1,6 +1,7 @@
 import System.Taffybar
 
 import System.Taffybar.Systray
+import System.Taffybar.Battery
 import System.Taffybar.TaffyPager
 import System.Taffybar.SimpleClock
 import System.Taffybar.MPRIS2
@@ -27,14 +28,16 @@ main = do
                                                       ]
                                   , graphLabel = Just "cpu"
                                   }
+      batteryCfg = defaultBatteryConfig
   let clock = textClockNew Nothing "<span fgcolor='orange'>%a %b %_d %r</span>" 1
       pager = taffyPagerNew defaultPagerConfig
       mpris = mpris2New
       mem = pollingGraphNew memCfg 1 memCallback
       cpu = pollingGraphNew cpuCfg 0.5 cpuCallback
       tray = systrayNew
+      battery = batteryBarNew batteryCfg 30
   defaultTaffybar defaultTaffybarConfig { startWidgets = [ pager ]
-                                        , endWidgets = [ tray, clock, mem, cpu, mpris ]
+                                        , endWidgets = [ battery, tray, clock, mem, cpu, mpris ]
                                         , monitorNumber = 1
                                         }