mirrors/IHaskell
1
0
Fork 0
mirror of https://github.com/IHaskell/IHaskell.git synced 2025-04-19 12:56:08 +00:00
Code Issues Packages Projects Releases Wiki Activity

Read binary GIF files as ByteStrings

Browse Source
This commit is contained in:
Manuel Gomez 2015-06-20 00:15:45 -04:30
parent e7a27b42e9
commit df38a542f9
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ihaskell-display/ihaskell-diagrams/IHaskell/Display/Diagrams/Animation.hs
View File

@ -48,8 +48,8 @@ animationData renderable = do
mainRender (diagOpts, gifOpts) frameSet
-- Convert to ascii represented base64 encoding
imgData <- readFile filename
return . T.unpack . base64 . CBS.pack $ imgData
imgData <- CBS.readFile filename
return . T.unpack . base64 $ imgData
-- Rendering hint.
animation :: Animation Cairo V2 Double -> Animation Cairo V2 Double