Tissevert/Hufflepdf
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

Fix a bug preventing Hufflepdf from reading objects with a ' ' after the obj keyword

Browse source
This commit is contained in:
Tissevert 2019-11-27 18:01:03 +01:00
parent d6994f0813
commit 380c1e439b
3 changed files with 6 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
ChangeLog.md
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

2
Hufflepdf.cabal
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

2
src/PDF/Object.hs
View file

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