Commit 5e158649 authored by Karen Konou's avatar Karen Konou

[Document upload] fix date parsing

parent 04e82dd6
Pipeline #4410 passed with stage
in 27 seconds
......@@ -95,7 +95,7 @@ documentUpload nId doc = do
(theFullDate, (year, month, day)) <- liftBase $ dateSplit EN
$ Just
$ view du_date doc <> "T:0:0:0"
$ view du_date doc
let hd = HyperdataDocument { _hd_bdd = Nothing
, _hd_doi = Nothing
......
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