colonelpanic/dotfiles
1
0
Fork 1
Code Issues Pull Requests Packages Projects Releases Wiki Activity

taffybar: reduce SNI tray overlay icon size (2/5 -> 1/3)

Browse Source 
Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
This commit is contained in:
Ivan Malison
2026-02-09 16:37:22 -08:00
committed by Kat Huang
parent f7cc33fc36
commit 0302cadd22
1 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
dotfiles/config/taffybar/taffybar.hs
View File

@@ -30,10 +30,12 @@ import qualified System.Taffybar.Widget.HyprlandWorkspaces as Hyprland
import qualified System.Taffybar.Widget.NetworkManager as NetworkManager import qualified System.Taffybar.Widget.NetworkManager as NetworkManager
import System.Taffybar.Widget.SNIMenu (withNmAppletMenu) import System.Taffybar.Widget.SNIMenu (withNmAppletMenu)
import qualified System.Taffybar.Widget.PulseAudio as PulseAudio import qualified System.Taffybar.Widget.PulseAudio as PulseAudio
import Data.Ratio ((%))
import System.Taffybar.Widget.SNITray import System.Taffybar.Widget.SNITray
( sniTrayNew ( sniTrayNewFromParams
, sniTrayThatStartsWatcherEvenThoughThisIsABadWayToDoIt , sniTrayThatStartsWatcherEvenThoughThisIsABadWayToDoIt
) )
import qualified StatusNotifier.Tray as SNITray (MenuBackend (HaskellDBusMenu), defaultTrayParams, trayMenuBackend, trayOverlayScale)
import System.Taffybar.Widget.Util (buildContentsBox, buildIconLabelBox, loadPixbufByName, widgetSetClassGI) import System.Taffybar.Widget.Util (buildContentsBox, buildIconLabelBox, loadPixbufByName, widgetSetClassGI)
import qualified System.Taffybar.Widget.Workspaces as X11Workspaces import qualified System.Taffybar.Widget.Workspaces as X11Workspaces
import System.Taffybar.WindowIcon (pixBufFromColor) import System.Taffybar.WindowIcon (pixBufFromColor)
@@ -324,7 +326,7 @@ sniTrayWidget :: TaffyIO Gtk.Widget
sniTrayWidget = sniTrayWidget =
decorateWithClassAndBoxM decorateWithClassAndBoxM
"sni-tray" "sni-tray"
sniTrayNew (sniTrayNewFromParams (SNITray.defaultTrayParams { SNITray.trayMenuBackend = SNITray.HaskellDBusMenu, SNITray.trayOverlayScale = 1 % 3 }))
-- ** Layout -- ** Layout