From 1cc4e7db52e73ecb3facb879ecc95f9eb4f1316f Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Fri, 11 Jan 2013 15:44:16 -0800 Subject: ImageSize: Remove no longer exported readImageSize. --- src/Text/Pandoc/ImageSize.hs | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) (limited to 'src/Text') diff --git a/src/Text/Pandoc/ImageSize.hs b/src/Text/Pandoc/ImageSize.hs index 66020b4e2..f97cda28c 100644 --- a/src/Text/Pandoc/ImageSize.hs +++ b/src/Text/Pandoc/ImageSize.hs @@ -29,7 +29,7 @@ Portability : portable Functions for determining the size of a PNG, JPEG, or GIF image. -} module Text.Pandoc.ImageSize ( ImageType(..), imageType, imageSize, - sizeInPixels, sizeInPoints, readImageSize ) where + sizeInPixels, sizeInPoints ) where import Data.ByteString (ByteString, unpack) import qualified Data.ByteString.Char8 as B import Control.Monad @@ -48,9 +48,6 @@ data ImageSize = ImageSize{ } deriving (Read, Show, Eq) -readImageSize :: FilePath -> IO (Maybe ImageSize) -readImageSize fp = imageSize `fmap` B.readFile fp - imageType :: ByteString -> Maybe ImageType imageType img = case B.take 4 img of "\x89\x50\x4e\x47" -> return Png -- cgit v1.2.3