getPostBuild
commitc1e8e10c6d18b0b5a41b16f1fd1df0ddd31d2c2e
authorali abrar <aliabrar@gmail.com>
dateSun 1 Mar 2015, 14:09 (12 years ago)
parent854fe5d
src/Reflex/Dom/Class.hs+6
@@ -122,6 +122,12 @@ performEventAsync e = do
122122 o $ \a -> postGui $ mapM_ (\t -> runWithActions [t :=> a]) =<< readRef reResultTrigger
123123 return eResult
124124
125+getPostBuild :: MonadWidget t m => m (Event t ())
126+getPostBuild = do
127+ (e, trigger) <- newEventWithTriggerRef
128+ schedulePostBuild $ runFrameWithTriggerRef trigger ()
129+ return e
130+
125131--------------------------------------------------------------------------------
126132--------------------------------------------------------------------------------
127133{-