mirror of
https://github.com/reanimate/reanimate.git
synced 2026-09-15 10:02:45 +00:00
3e371f7627
* Add slide transitions. Co-authored-by: eveyyp <55053150+eveyyp@users.noreply.github.com> Former-commit-id: afa93f45f8d0f556ad73e349091f0226ce173eed
11 lines
304 B
Haskell
Executable file
11 lines
304 B
Haskell
Executable file
{-# LANGUAGE OverloadedStrings #-}
|
|
module EndScene (endScene) where
|
|
|
|
import Reanimate
|
|
import Reanimate.Builtin.Images
|
|
import Transcript
|
|
|
|
endScene :: Scene s ()
|
|
endScene = do
|
|
newSpriteSVG_ $ scale 0.5 $ githubWhiteIcon
|
|
waitUntil $ wordEnd (findWord ["end"] "domain") + 1
|