gtk-sni-tray 0.1.9.0 → 0.1.9.1
raw patch · 3 files changed
+13/−4 lines, 3 files
Files
- ChangeLog.md +6/−0
- gtk-sni-tray.cabal +2/−2
- src/StatusNotifier/Tray.hs +5/−2
ChangeLog.md view
@@ -1,5 +1,11 @@ # Changelog for gtk-sni-tray +## 0.1.9.1++- Fix type error with DM.Menu and Gtk.menuPopupAtWidget by adding explicit+ cast to Gtk.Menu. This fixes build failures with newer GI bindings where the+ type hierarchy is not automatically recognized.+ ## 0.1.9.0 - Use the `gi-gtk3` and `gi-gdk3` build dependencies, which have been
gtk-sni-tray.cabal view
@@ -1,11 +1,11 @@ cabal-version: 1.12 --- This file has been generated from package.yaml by hpack version 0.38.2.+-- This file has been generated from package.yaml by hpack version 0.38.3. -- -- see: https://github.com/sol/hpack name: gtk-sni-tray-version: 0.1.9.0+version: 0.1.9.1 synopsis: A standalone StatusNotifierItem/AppIndicator tray description: Please see the README on Github at <https://github.com/IvanMalison/gtk-sni-tray#readme> category: System
src/StatusNotifier/Tray.hs view
@@ -15,6 +15,7 @@ import qualified Data.ByteString as BS import Data.Coerce import Data.Foldable (traverse_)+import Data.GI.Base (unsafeCastTo) import Data.GI.Base.GError import Data.Int import Data.List@@ -358,8 +359,10 @@ , contextImage = image , contextButton = button }- popupItemForMenu menu =- Gtk.menuPopupAtWidget menu image+ popupItemForMenu menu = do+ -- Cast DM.Menu to Gtk.Menu for menuPopupAtWidget+ gtkMenu <- unsafeCastTo Gtk.Menu menu+ Gtk.menuPopupAtWidget gtkMenu image GravitySouthWest GravityNorthWest Nothing _ <- Gtk.onWidgetButtonPressEvent button $ \event -> do