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

[FIX] Debug message

parent 8df0e46e
Pipeline #3473 canceled with stage
...@@ -74,7 +74,7 @@ type Day = Int ...@@ -74,7 +74,7 @@ type Day = Int
-- 1900-04-01 00:00:00 UTC -- 1900-04-01 00:00:00 UTC
parse :: Lang -> Text -> IO UTCTime parse :: Lang -> Text -> IO UTCTime
parse lang s = do parse lang s = do
printDebug "Date: " s -- printDebug "Date: " s
let result = dateFlow (DucklingFailure s) let result = dateFlow (DucklingFailure s)
--printDebug "Date': " dateStr' --printDebug "Date': " dateStr'
case result of 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