diff --git a/hledger-lib/Hledger/Read/TimedotReader.hs b/hledger-lib/Hledger/Read/TimedotReader.hs
index 93faa830f..51221340e 100644
--- a/hledger-lib/Hledger/Read/TimedotReader.hs
+++ b/hledger-lib/Hledger/Read/TimedotReader.hs
@@ -76,10 +76,10 @@ parse = parseAndFinaliseJournal' timedotfilep
 
 -- ** utilities
 
--- traceparse :: Monad m => a -> m a
--- traceparse = return
-traceparse :: String -> JournalParser m ()
-traceparse = lift.traceParse
+traceparse :: Monad m => a -> m a
+traceparse = return
+-- traceparse :: String -> JournalParser m ()
+-- traceparse = lift.traceParse
 
 -- ** parsers