Merge branch 'main' into extract-text

This commit is contained in:
Tissevert 2019-11-27 18:05:47 +01:00
commit 42a02808c1
3 changed files with 6 additions and 2 deletions

View file

@ -1,5 +1,9 @@
# Revision history for Hufflepdf # Revision history for Hufflepdf
## 0.2.0.1 -- 2019-11-27
* Fix bug discovered while running Hufflepdf on a PDF output from pdftk : magic keywords like `obj`, `stream` or `xref` can have spaces after them before the EOL
## 0.2.0.0 -- 2019-10-14 ## 0.2.0.0 -- 2019-10-14
* Implement PDF's multilayer update mechanism * Implement PDF's multilayer update mechanism

View file

@ -2,7 +2,7 @@
-- documentation, see http://haskell.org/cabal/users-guide/ -- documentation, see http://haskell.org/cabal/users-guide/
name: Hufflepdf name: Hufflepdf
version: 0.2.0.0 version: 0.2.0.1
synopsis: A PDF parser synopsis: A PDF parser
-- description: -- description:
license: BSD3 license: BSD3

View file

@ -54,7 +54,7 @@ import PDF.Parser (MonadParser(..), Parser, (<?>), octDigit, oneOf)
import Text.Printf (printf) import Text.Printf (printf)
line :: MonadParser m => String -> m () line :: MonadParser m => String -> m ()
line l = (string (Char8.pack l) *> EOL.parser *> return ()) <?> printf "line «%s»" l line l = (string (Char8.pack l) *> blank *> return ()) <?> printf "line «%s»" l
magicNumber :: ByteString magicNumber :: ByteString
magicNumber = "%PDF-" magicNumber = "%PDF-"