Commit f9f2456f authored by Alexandre Delanoë's avatar Alexandre Delanoë

[FIX] Debug message

parent 8df0e46e
......@@ -74,7 +74,7 @@ type Day = Int
-- 1900-04-01 00:00:00 UTC
parse :: Lang -> Text -> IO UTCTime
parse lang s = do
printDebug "Date: " s
-- printDebug "Date: " s
let result = dateFlow (DucklingFailure s)
--printDebug "Date': " dateStr'
case result of
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment