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
parent 0a6931cf77
commit 67d5bd793b
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