mirror of
https://github.com/reanimate/reanimate.git
synced 2026-09-15 18:12:20 +00:00
Fix warnings.
Former-commit-id: 14b142ace909a1861b6cff2c0bf62e0f34484749
This commit is contained in:
parent
5eb6066ade
commit
83bb0c46da
1 changed files with 2 additions and 3 deletions
|
|
@ -5,12 +5,10 @@
|
|||
module Main (main) where
|
||||
|
||||
import Data.String.Here
|
||||
import qualified Data.Text as T
|
||||
import Reanimate
|
||||
import Reanimate.Blender
|
||||
import Reanimate.Raster
|
||||
import System.FilePath
|
||||
import qualified Data.Text as T
|
||||
import qualified Data.Text.IO as T
|
||||
|
||||
main :: IO ()
|
||||
main = reanimate $ mkAnimation 5 $ \t ->
|
||||
|
|
@ -20,6 +18,7 @@ main = reanimate $ mkAnimation 5 $ \t ->
|
|||
, blender (script s)
|
||||
]
|
||||
|
||||
texture :: FilePath
|
||||
texture = svgAsPngFile (mkGroup
|
||||
[ checker 10 10
|
||||
, withFillColor "red" $
|
||||
|
|
|
|||
Loading…
Reference in a new issue