Generalize the getFont function because some /Resources have a direct dictionary as value for their /Font property
This commit is contained in:
parent
cefb08ee50
commit
a2b66ac6d6
1 changed files with 1 additions and 2 deletions
|
@ -65,8 +65,7 @@ getFont pageDict =
|
|||
key "Resources" pageDict
|
||||
//= getResource
|
||||
\\= key "Font"
|
||||
>>= follow
|
||||
\\= dict
|
||||
>>= getResource
|
||||
|
||||
cache :: (ObjectId -> T CMap) -> ObjectId -> T CMap
|
||||
cache loader objectId =
|
||||
|
|
Loading…
Reference in a new issue