diff --git a/src/Dhall/Parser.hs b/src/Dhall/Parser.hs
index 6f28624..f7f4e37 100644
--- a/src/Dhall/Parser.hs
+++ b/src/Dhall/Parser.hs
@@ -101,8 +101,6 @@ instance TokenParsing Parser where
 
     highlight h (Parser m) = Parser (highlight h m)
 
-    token parser = Parser (token (unParser parser))
-
 identifierStyle :: IdentifierStyle Parser
 identifierStyle = IdentifierStyle
     { _styleName     = "dhall"