ImageSize: Remove no longer exported readImageSize.

This commit is contained in:
John MacFarlane 2013-01-11 15:44:16 -08:00
parent 2a0ed1c433
commit 1cc4e7db52

View file

@ -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