diff --git a/src/PDF/Content/Text.hs b/src/PDF/Content/Text.hs
index 63d459a..a818ecf 100644
--- a/src/PDF/Content/Text.hs
+++ b/src/PDF/Content/Text.hs
@@ -46,16 +46,10 @@ decodeString input = do
 
 data Chunks = Chunks
 
-instance Monad m => Box m Chunks Content (Indexed Text) where
-  r Chunks _ = return $ Map.fromList [(Id 17, "Test")]
-
-{-
 instance (MonadReader FontSet m, MonadFail m) => Box m Chunks Content (Indexed Text) where
   r Chunks content = do
     fontSet <- ask
     renderText fontSet content
--}
-
 
 renderText :: MonadFail m => FontSet -> Content -> m (Indexed Text)
 renderText fontSet (Content.Content {contentUnits, Content.indexedInstructions}) =