Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

ImageSize: Fixed implementation of sizeInPoints.

Browse source
This commit is contained in:
John MacFarlane 2012-01-15 15:58:44 -08:00
parent b4e2d69cda
commit 9ce3e2bf85
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/Text/Pandoc/ImageSize.hs
View file

@ -70,7 +70,7 @@ sizeInPixels :: ImageSize -> (Integer, Integer)
sizeInPixels s = (pxX s, pxY s)
sizeInPoints :: ImageSize -> (Integer, Integer)
sizeInPoints s = (pxX s `div` dpiX s * 72, pxY s `div` dpiY s * 72)
sizeInPoints s = (pxX s * 72 `div` dpiX s, pxY s * 72 `div` dpiY s)
pngSize :: ByteString -> Maybe ImageSize
pngSize img = do