taffybar: use button and overlay controllers for workspace widget
Wire up hyprlandBuildButtonController and hyprlandBuildCustomOverlayController so workspace buttons are clickable and the overlay layout is explicitly configured. Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
This commit is contained in:
@@ -364,11 +364,16 @@ buildAlignedOverlay halign valign iconsWidget labelWidget = liftIO $ do
|
|||||||
hyprlandWorkspacesWidget :: TaffyIO Gtk.Widget
|
hyprlandWorkspacesWidget :: TaffyIO Gtk.Widget
|
||||||
hyprlandWorkspacesWidget =
|
hyprlandWorkspacesWidget =
|
||||||
flip widgetSetClassGI "workspaces" =<<
|
flip widgetSetClassGI "workspaces" =<<
|
||||||
Hyprland.hyprlandWorkspacesNew
|
Hyprland.hyprlandWorkspacesNew cfg
|
||||||
Hyprland.defaultHyprlandWorkspacesConfig
|
where
|
||||||
|
cfg = Hyprland.defaultHyprlandWorkspacesConfig
|
||||||
{ Hyprland.widgetGap = 0
|
{ Hyprland.widgetGap = 0
|
||||||
, Hyprland.minIcons = 1
|
, Hyprland.minIcons = 1
|
||||||
, Hyprland.widgetBuilder = buildAlignedOverlay Gtk.AlignStart Gtk.AlignEnd
|
, Hyprland.widgetBuilder =
|
||||||
|
Hyprland.hyprlandBuildButtonController cfg
|
||||||
|
(Hyprland.hyprlandBuildCustomOverlayController
|
||||||
|
(buildAlignedOverlay Gtk.AlignStart Gtk.AlignEnd)
|
||||||
|
cfg)
|
||||||
-- Don't show Hyprland "special:*" workspaces.
|
-- Don't show Hyprland "special:*" workspaces.
|
||||||
, Hyprland.showWorkspaceFn =
|
, Hyprland.showWorkspaceFn =
|
||||||
\ws ->
|
\ws ->
|
||||||
|
|||||||
Reference in New Issue
Block a user