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

Forgot to remove commented-out dead code

Browse source
This commit is contained in:
Tissevert 2020-02-05 19:49:03 +01:00
parent b859338a57
commit b5a15a692b
1 changed files with 0 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
src/PDF/Pages.hs
View file

@ -92,7 +92,6 @@ loadFonts = foldM addFont Map.empty . Map.toList
addFont :: FontSet -> (Name, DirectObject) -> T FontSet addFont :: FontSet -> (Name, DirectObject) -> T FontSet
addFont output (name, Reference (IndirectObjCoordinates {objectId})) = addFont output (name, Reference (IndirectObjCoordinates {objectId})) =
flip (Map.insert name) output <$> cache loadFont objectId flip (Map.insert name) output <$> cache loadFont objectId
--maybe output (flip (Map.insert name) output) <$> cache loadFont objectId
addFont output _ = return output addFont output _ = return output
getObject :: ObjectId -> T Object getObject :: ObjectId -> T Object