diff --git a/src/PDF/Object/Navigation.hs b/src/PDF/Object/Navigation.hs
index 19805b3..3640704 100644
--- a/src/PDF/Object/Navigation.hs
+++ b/src/PDF/Object/Navigation.hs
@@ -40,6 +40,7 @@ instance MonadFail Error where
 
 castDictionary :: MonadFail m => Object -> m Dictionary
 castDictionary (Direct (Dictionary aDict)) = return aDict
+castDictionary (Stream {header}) = return header
 castDictionary obj = expected "dictionary : " obj
 
 castObjectId :: MonadFail m => DirectObject -> m ObjectId