taffybar 3.2.5 → 3.3.0
raw patch · 4 files changed
+28/−24 lines, 4 filesdep ~gtk-sni-traydep ~status-notifier-item
Dependency ranges changed: gtk-sni-tray, status-notifier-item
Files
- CHANGELOG.md +13/−0
- src/System/Taffybar.hs +1/−1
- src/System/Taffybar/Widget/SNITray.hs +11/−20
- taffybar.cabal +3/−3
CHANGELOG.md view
@@ -1,3 +1,16 @@+# 3.3.0++## Bug Fixes++* Compatibility with newer versions of GHC.++## New Features++ * A wttr.in widget was added.+ * Make memoryAvailable action available inside the Text MemoryMonitor widget.+ * The SNI Tray supports triggering Activate and SecondaryActivate on icons.+ * Better formatting for Text MemoryMonitor Widget+ # 3.2.2 ## Bug Fixes
src/System/Taffybar.hs view
@@ -80,7 +80,7 @@ -- started before starting taffybar. -- -- * If you start your window manager using a graphical login manager like gdm- -- or kdm, DBus should be started rautomatically for you.+ -- or kdm, DBus should be started automatically for you. -- -- * If you start xmonad with a different graphical login manager that does -- not start DBus for you automatically, put the line @eval \`dbus-launch
src/System/Taffybar/Widget/SNITray.hs view
@@ -28,9 +28,7 @@ import Control.Monad.Trans.Class import Control.Monad.Trans.Reader-import Data.Ratio import qualified GI.Gtk-import Graphics.UI.GIGtkStrut import qualified StatusNotifier.Host.Service as H import StatusNotifier.Tray import System.Posix.Process@@ -49,35 +47,28 @@ } return host --- | Build a new StatusNotifierItem tray that will share a host with any other--- trays that are constructed automatically-sniTrayNewFromHost :: H.Host -> TaffyIO GI.Gtk.Widget-sniTrayNewFromHost host = do+-- | Build a new StatusNotifierItem tray from the provided parameters+sniTrayNewFromParams :: TrayParams -> TaffyIO GI.Gtk.Widget+sniTrayNewFromParams params = getHost False >>= sniTrayNewFromHostParams params++sniTrayNewFromHostParams :: TrayParams -> H.Host -> TaffyIO GI.Gtk.Widget+sniTrayNewFromHostParams params host = do client <- asks sessionDBusClient lift $ do- tray <-- buildTray- TrayParams- { trayHost = host- , trayClient = client- , trayOrientation = GI.Gtk.OrientationHorizontal- , trayImageSize = Expand- , trayIconExpand = False- , trayAlignment = End- , trayOverlayScale = 3 % 5- }+ tray <- buildTray host client params _ <- widgetSetClassGI tray "sni-tray" GI.Gtk.widgetShowAll tray GI.Gtk.toWidget tray --- | The simplest way to build a new StatusNotifierItem tray+-- | Build a new StatusNotifierItem tray that will share a host with any other+-- trays that are constructed automatically sniTrayNew :: TaffyIO GI.Gtk.Widget-sniTrayNew = getHost False >>= sniTrayNewFromHost+sniTrayNew = sniTrayNewFromParams defaultTrayParams -- | Build a new StatusNotifierItem tray that also starts its own watcher, -- without depending on status-notifier-icon. This will not register applets -- started before the watcher is started. sniTrayThatStartsWatcherEvenThoughThisIsABadWayToDoIt :: TaffyIO GI.Gtk.Widget sniTrayThatStartsWatcherEvenThoughThisIsABadWayToDoIt =- getHost True >>= sniTrayNewFromHost+ getHost True >>= sniTrayNewFromHostParams defaultTrayParams
taffybar.cabal view
@@ -1,5 +1,5 @@ name: taffybar-version: 3.2.5+version: 3.3.0 synopsis: A desktop bar similar to xmobar, but with more GUI license: BSD3 license-file: LICENSE@@ -59,7 +59,7 @@ , gi-gtk , gi-gtk-hs , gi-pango- , gtk-sni-tray >= 0.1.5.0+ , gtk-sni-tray >= 0.1.8.0 , gtk-strut >= 0.1.2.1 , haskell-gi >= 0.24 , haskell-gi-base >= 0.24@@ -76,7 +76,7 @@ , safe >= 0.3 && < 1 , scotty >= 0.11.0 && < 0.12.0 , split >= 0.1.4.2- , status-notifier-item >= 0.3.0.5+ , status-notifier-item >= 0.3.1.0 , stm , template-haskell , text