Skip to content

G
gargantext-ihaskell
Commit df38a542 authored by Manuel Gomez's avatar Manuel Gomez
Browse files
Options

Read binary GIF files as ByteStrings

parent e7a27b42
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 2 deletions
ihaskell-display/ihaskell-diagrams/IHaskell/Display/Diagrams/Animation.hs
View file @ df38a542
...@@ -48,8 +48,8 @@ animationData renderable = do ...@@ -48,8 +48,8 @@ animationData renderable = do
mainRender (diagOpts, gifOpts) frameSet mainRender (diagOpts, gifOpts) frameSet
-- Convert to ascii represented base64 encoding -- Convert to ascii represented base64 encoding
imgData <- readFile filename imgData <- CBS.readFile filename
return . T.unpack . base64 . CBS.pack $ imgData return . T.unpack . base64 $ imgData
-- Rendering hint. -- Rendering hint.
animation :: Animation Cairo V2 Double -> Animation Cairo V2 Double animation :: Animation Cairo V2 Double -> Animation Cairo V2 Double
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment