keera-hails-reactive-gtk 0.7.0 → 0.8.0
raw patch · 2 files changed
+8/−8 lines, 2 filesdep ~base
Dependency ranges changed: base
Files
keera-hails-reactive-gtk.cabal view
@@ -6,7 +6,7 @@ build-type: Simple name: keera-hails-reactive-gtk-version: 0.7.0+version: 0.8.0 author: Ivan Perez maintainer: support@keera.co.uk homepage: http://www.keera.co.uk/blog/community/@@ -72,7 +72,7 @@ Graphics.UI.Gtk.Reactive.Window build-depends:- base >= 4 && < 5+ base >= 4 && < 5 , bytestring , mtl , transformers@@ -111,8 +111,8 @@ buildable: False else build-depends:- base- , hlint >= 1.7+ base >= 4 && < 5+ , hlint >= 1.7 -- Verify that the code is thoroughly documented test-suite haddock-coverage@@ -136,7 +136,7 @@ buildable: False else build-depends:- base >= 4 && < 5+ base >= 4 && < 5 , directory , filepath , process
src/Graphics/UI/Gtk/Reactive/Property.hs view
@@ -126,10 +126,10 @@ => self -> (self -> b -> IO ()) -> (self -> IO b) -> ReactiveFieldReadWrite IO b-passivePropertyGE e set get =+passivePropertyGE e set' get' = ReactiveFieldReadWrite setter getter notifier- where getter = get e+ where getter = get' e setter v = postGUIAsync $ do p <- getter- when (p /= v) $ set e v+ when (p /= v) $ set' e v notifier _ = return ()