keera-hails-reactive-gtk 0.0.3.5 → 0.0.3.6

raw patch · 2 files changed

+3/−4 lines, 2 files

Files

• keera-hails-reactive-gtk.cabal +1/−1
• src/Graphics/UI/Gtk/Reactive/Window.hs +2/−3

@@ -7,7 +7,7 @@ -- The package version. See the Haskell package versioning policy -- (http://www.haskell.org/haskellwiki/Package_versioning_policy) for -- standards guiding when and how versions should be incremented.-Version:             0.0.3.5+Version:             0.0.3.6  -- A short (one-line) description of the package. Synopsis:            Haskell on Gtk rails - Reactive Fields for Gtk widgets

@@ -12,8 +12,7 @@  windowVisibilityPassive :: WindowClass self => self -> ReactiveFieldReadWrite IO Bool windowVisibilityPassive self = ReactiveFieldReadWrite setter getter (const $ return ())- where setter x = onViewAsync $ do-                     x' <- getter+ where setter x = do x' <- getter                      when (x /= x') $-                       if x then widgetShowAll self else widgetHide    self+                       if x then widgetShowAll self else widgetHide self        getter = get self widgetVisible