diff --git a/src/PDF/Object/Navigation.hs b/src/PDF/Object/Navigation.hs
index 92ec370..a5cb40c 100644
--- a/src/PDF/Object/Navigation.hs
+++ b/src/PDF/Object/Navigation.hs
@@ -58,8 +58,8 @@ getField key aDictionary =
 
 objectById :: PDFContent m => ObjectId -> m Object
 objectById objectId = do
-  content <- ask
-  return (objects content ! objectId)
+  layer <- ask
+  return (objects layer ! objectId)
 
 (./) :: PDFContent m => m Object -> String -> m Object
 (./) object key = (object >>= getDictionary >>= getField key >>= castObject)