taffybar: add CPU widget and advance local pin

This commit is contained in:
org-agenda-api
2026-03-03 11:51:42 -08:00
parent 988df4ba8d
commit e2f69af4e5
3 changed files with 21 additions and 3 deletions

View File

@@ -317,8 +317,8 @@
"xmonad-contrib": "xmonad-contrib" "xmonad-contrib": "xmonad-contrib"
}, },
"locked": { "locked": {
"lastModified": 1772010218, "lastModified": 1772138985,
"narHash": "sha256-UvV+Ea516CC9Q98LalEGh6xWdd/RVGOo2cYYSbq1+Go=", "narHash": "sha256-5nv2ZcQW+lqTO7Idri1Zd5uZI6DS3t5OSVOAqWvg5D4=",
"path": "/home/imalison/dotfiles/dotfiles/config/taffybar/taffybar", "path": "/home/imalison/dotfiles/dotfiles/config/taffybar/taffybar",
"type": "path" "type": "path"
}, },

View File

@@ -44,6 +44,8 @@ import System.Taffybar.SimpleConfig
import System.Taffybar.Util (getPixbufFromFilePath, maybeTCombine, postGUIASync, (<|||>)) import System.Taffybar.Util (getPixbufFromFilePath, maybeTCombine, postGUIASync, (<|||>))
import System.Taffybar.Widget import System.Taffybar.Widget
import qualified System.Taffybar.Widget.ASUS as ASUS import qualified System.Taffybar.Widget.ASUS as ASUS
import System.Taffybar.Widget.CPUMonitor (cpuMonitorNew)
import System.Taffybar.Widget.Generic.Graph (GraphConfig (..), GraphDirection (..), GraphStyle (..), defaultGraphConfig)
import qualified System.Taffybar.Widget.NetworkManager as NetworkManager import qualified System.Taffybar.Widget.NetworkManager as NetworkManager
import qualified System.Taffybar.Widget.PulseAudio as PulseAudio import qualified System.Taffybar.Widget.PulseAudio as PulseAudio
import System.Taffybar.Widget.SNIMenu (withNmAppletMenu) import System.Taffybar.Widget.SNIMenu (withNmAppletMenu)
@@ -482,6 +484,20 @@ sunLockWidget :: TaffyIO Gtk.Widget
sunLockWidget = sunLockWidget =
stackInPill "sun-lock" [simplifiedWlsunsetWidget, simplifiedScreenLockWidget] stackInPill "sun-lock" [simplifiedWlsunsetWidget, simplifiedScreenLockWidget]
cpuWidget :: TaffyIO Gtk.Widget
cpuWidget =
decorateWithClassAndBoxM "cpu" $
liftIO $
cpuMonitorNew
defaultGraphConfig
{ graphDataColors = [(0, 1, 0.5, 0.8), (1, 0, 0, 0.5)],
graphLabel = Just "CPU",
graphWidth = 50,
graphDirection = LEFT_TO_RIGHT
}
1.0
"cpu"
wakeupDebugWidget :: TaffyIO Gtk.Widget wakeupDebugWidget :: TaffyIO Gtk.Widget
wakeupDebugWidget = wakeupDebugWidget =
decorateWithClassAndBoxM "wakeup-debug" wakeupDebugWidgetNew decorateWithClassAndBoxM "wakeup-debug" wakeupDebugWidgetNew
@@ -544,6 +560,7 @@ endWidgetsForHost hostName =
let baseEndWidgets = let baseEndWidgets =
[ sniTrayWidget, [ sniTrayWidget,
audioWidget, audioWidget,
cpuWidget,
ramSwapWidget, ramSwapWidget,
diskUsageWidget, diskUsageWidget,
networkWidget, networkWidget,
@@ -555,6 +572,7 @@ endWidgetsForHost hostName =
sniTrayWidget, sniTrayWidget,
asusDiskUsageWidget, asusDiskUsageWidget,
audioBacklightWidget, audioBacklightWidget,
cpuWidget,
ramSwapWidget, ramSwapWidget,
sunLockWidget, sunLockWidget,
mprisWidget mprisWidget