[taffybar] Updates for WorkspaceHUD

dotfiles/config/taffybar/taffybar.hs

@@ -3,6 +3,7 @@ import System.Taffybar
 import System.Taffybar.MPRIS2
 import System.Taffybar.Pager
 import System.Taffybar.SimpleClock
+import System.Taffybar.WorkspaceHUD
 import System.Taffybar.Systray
 import System.Taffybar.TaffyPager
 
@@ -30,21 +31,16 @@ main = do
                                   }
   let clock = textClockNew Nothing "%a %b %_d %r" 1
       pagerConfig = defaultPagerConfig
-                    { useImages = True
-                    , emptyWorkspace = id
-                    , urgentWorkspace = id
-                    , imageCount = 8
-                    , workspaceGap = 0
-                    , activeWorkspace = escape
-                    , visibleWorkspace = escape
-                    , workspaceBorder = False
-                    }
-      pager = taffyPagerNew pagerConfig
       mpris = mpris2New
       mem = pollingGraphNew memCfg 1 memCallback
       cpu = pollingGraphNew cpuCfg 0.5 cpuCallback
       tray = systrayNew
-  defaultTaffybar defaultTaffybarConfig { startWidgets = [ pager ]
+      hudConfig = defaultWorkspaceHUDConfig { underlineHeight = 3
+                                            , minWSWidgetSize = Just 50
+                                            }
+      hud = taffyPagerHUDNew pagerConfig hudConfig
+
+  defaultTaffybar defaultTaffybarConfig { startWidgets = [ hud ]
                                         , endWidgets = [ tray, clock, mem, cpu, mpris ]
                                         , monitorNumber = 1
                                         , barPosition = Top

dotfiles/config/taffybar/taffybar.rc

@@ -46,6 +46,10 @@ style "taffybar-workspace-border-urgent" = "taffybar-default" {
   bg[NORMAL] = @black
 }
 
+style "taffybar-icon-urgent" = "taffybar-default" {
+  bg[NORMAL] = @yellow
+}
+
 widget "Taffybar*" style "taffybar-default"
 widget "Taffybar*WindowSwitcher*label" style "taffybar-active-window"
 widget "*NotificationCloseButton" style "taffybar-notification-button"
@@ -56,4 +60,4 @@ widget "*Workspace-underline*-empty*" style "taffybar-workspace-border-empty"
 widget "*Workspace-underline*-hidden*" style "taffybar-workspace-border-hidden"
 widget "*Workspace-underline*-urgent*" style "taffybar-workspace-border-urgent"
 
-widget "*Workspace-underline*-active*" style "taffybar-workspace-underline"
+widget "*Workspace-icon*-urgent*" style "taffybar-icon-urgent"