diff --git a/src/PDF/Pages.hs b/src/PDF/Pages.hs
index b882dbf..eef6bdd 100755
--- a/src/PDF/Pages.hs
+++ b/src/PDF/Pages.hs
@@ -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 =