mirror of
https://github.com/reanimate/reanimate.git
synced 2026-09-13 09:02:54 +00:00
Add basic oShow and oHide.
This commit is contained in:
parent
b1dd98a4f7
commit
73b6941986
1 changed files with 8 additions and 0 deletions
|
|
@ -97,6 +97,8 @@ module Reanimate.Scene
|
|||
, withEasing
|
||||
|
||||
-- ** Graphics object methods
|
||||
, oShow
|
||||
, oHide
|
||||
, oFadeIn
|
||||
, oFadeOut
|
||||
, oGrow
|
||||
|
|
@ -831,6 +833,12 @@ makeLenses ''Morph
|
|||
withEasing :: Signal -> (Double -> c) -> (Double -> c)
|
||||
withEasing signal fn = fn . signal
|
||||
|
||||
oShow :: Object s a -> Scene s ()
|
||||
oShow o = oModify o $ oShown .~ True
|
||||
|
||||
oHide :: Object s a -> Scene s ()
|
||||
oHide o = oModify o $ oShown .~ False
|
||||
|
||||
oFadeIn :: Object s a -> Duration -> Scene s ()
|
||||
oFadeIn o d = do
|
||||
oModify o $
|
||||
|
|
|
|||
Loading…
Reference in a new issue