1 files changed, 1 insertions, 1 deletions

diff --git a/src/Wavefront.hs b/src/Wavefront.hs
index 1fc8ec3..0da9f41 100644
--- a/src/Wavefront.hs
+++ b/src/Wavefront.hs
@@ -79,7 +79,7 @@ modifyFirst :: MonadState (c, d) m => (c -> c) -> m ()
 modifyFirst = modify' . first
 
 buildOBJ :: ObjBuilder (State (OBJ DList,Element ()))
-buildOBJ = (nullBuilder $ pure ())
+buildOBJ = nullBuilder
     { vertex = \xs -> modifyFirst $ \o -> o { objLocations = objLocations o `DList.snoc` mkv xs }
     , vertexT = \xs -> modifyFirst $ \o -> o { objTexCoords = objTexCoords o `DList.snoc` mkt xs }
     , vertexN = \xs -> modifyFirst $ \o -> o { objNormals = objNormals o `DList.snoc` mkn xs }