pdfinfo 0.1.3.1 → 0.1.3.3

raw patch · 2 files changed

+24/−23 lines, 2 filesdep ~mtldep ~old-localedep ~process

Dependency ranges changed: mtl, old-locale, process, time

Files

• pdfinfo.cabal +21/−20
• src/Text/PDF/Info.hs +3/−3

@@ -1,20 +1,21 @@-Name:                pdfinfo-Version:             0.1.3.1-Synopsis:            Wrapper around the pdfinfo command.-Description:         Just a wrapper around the pdfinfo command. See man pdfinfo.-License:             BSD3-License-file:        LICENSE-Author:              Chris Done-Maintainer:          chrisdone@gmail.com-Copyright:           2010 Chris Done-Category:            Text-Build-type:          Simple-Cabal-version:       >=1.2-Library-  Exposed-modules:   Text.PDF.Info-  Hs-source-dirs:    src/-  Build-depends:     base >= 4 && < 5,-                     old-locale >= 1.0.0.0 && <= 1.0.0.4,-                     time >= 1.1 && <= 1.4.0.1,-                     process >= 1.0 && <= 1.1.0.1,-                     mtl >= 1.1 && <= 2.1.1+name:                pdfinfo+version:             0.1.3.3+synopsis:            Wrapper around the pdfinfo command.+description:         Just a wrapper around the pdfinfo command. See man pdfinfo.+license:             BSD3+license-file:        LICENSE+author:              Chris Done+maintainer:          chrisdone@gmail.com+copyright:           2010 Chris Done+category:            Text+build-type:          Simple+cabal-version:       >=1.2+library+  ghc-options:        -O2 -Wall+  exposed-modules:   Text.PDF.Info+  hs-source-dirs:    src/+  build-depends:     base >= 4 && < 5,+                     old-locale >= 1.0.0.0 && < 1.1,+                     time >= 1.1 && < 1.5,+                     process >= 1.0 && < 1.2,+                     mtl >= 1.1 && < 2.2

@@ -16,7 +16,7 @@     ,readRight)     where -import Prelude hiding (catch)+import Prelude import Control.Monad.Error import System.Process import Control.Applicative@@ -24,7 +24,7 @@ import Data.Char import Data.Time import System.Locale-import Control.Exception+import Control.Exception as E  -- | A type representing the output from the pdfinfo command. data PDFInfo = PDFInfo {@@ -64,7 +64,7 @@ -- | Run pdfinfo on the given file. Handles IO exceptions to do with -- running the process. pdfInfo :: MonadIO m => FilePath -> m (Either PDFInfoError PDFInfo)-pdfInfo path = liftIO $ loadInfo `catch` ioErrorHandler where+pdfInfo path = liftIO $ loadInfo `E.catch` ioErrorHandler where   loadInfo = parse <$> readProcess "pdfinfo" [path] ""   ioErrorHandler = return . Left . ProcessError