reactive-banana-gi-gtk 0.1.0.0 → 0.2.0.0
raw patch · 2 files changed
+10/−10 lines, 2 filesdep ~reactive-banana-gi-gtk
Dependency ranges changed: reactive-banana-gi-gtk
Files
reactive-banana-gi-gtk.cabal view
@@ -1,5 +1,5 @@ name: reactive-banana-gi-gtk-version: 0.1.0.0+version: 0.2.0.0 cabal-version: >=1.10 build-type: Simple license: PublicDomain@@ -34,7 +34,7 @@ main-is: Spec.hs build-depends: base >=4.9.1.0 && <4.10,- reactive-banana-gi-gtk >=0.1.0.0 && <0.2+ reactive-banana-gi-gtk >=0.2.0.0 && <0.3 default-language: Haskell2010 hs-source-dirs: test ghc-options: -threaded -rtsopts -with-rtsopts=-N
src/Reactive/Banana/GI/Gtk.hs view
@@ -11,8 +11,8 @@ , signalEN , signalE0 , signalE1- , propE- , propB+ , attrE+ , attrB , sink , AttrOpBehavior(..) ) where@@ -143,7 +143,7 @@ -- | Get an 'Reactive.Banana.Event' from -- a 'Data.GI.Base.Attributes.AttrLabelProxy' that produces one argument.-propE+attrE :: ( GObject self , AttrGetC info self attr result@@ -152,12 +152,12 @@ => self -> AttrLabelProxy (attr :: Symbol) -> MomentIO (Event result)-propE self attr = do+attrE self attr = do e <- signalE1 self (PropertyNotify attr) (const $ get self attr) `mapEventIO` e --- | stepper on 'propE'-propB+-- | stepper on 'attrE'+attrB :: ( GObject self , AttrGetC info self attr result@@ -166,8 +166,8 @@ => self -> AttrLabelProxy (attr :: Symbol) -> MomentIO (Behavior result)-propB self attr = do- e <- propE self attr+attrB self attr = do+ e <- attrE self attr initV <- get self attr stepper initV e