diff --git a/messages/uniworx/de.msg b/messages/uniworx/de.msg index 411cdb696..2f7bda32d 100644 --- a/messages/uniworx/de.msg +++ b/messages/uniworx/de.msg @@ -253,6 +253,7 @@ DownloadFilesTip: Wenn gesetzt werden Dateien von Abgaben und Übungsblättern a InvalidDateTimeFormat: Ungültiges Datums- und Zeitformat, JJJJ-MM-TTTHH:MM[:SS] Format erwartet AmbiguousUTCTime: Der angegebene Zeitpunkt lässt sich nicht eindeutig zu UTC konvertieren +IllDefinedUTCTime: Der angegebene Zeitpunkt lässt sich nicht zu UTC konvertieren LastEdits: Letzte Änderungen EditedBy name@Text time@Text: Durch #{name} um #{time} diff --git a/src/Handler/Utils/Form.hs b/src/Handler/Utils/Form.hs index f405a6dd7..0d5e5e9f8 100644 --- a/src/Handler/Utils/Form.hs +++ b/src/Handler/Utils/Form.hs @@ -344,7 +344,7 @@ utcTimeField = Field readTime t = case localTimeToUTC <$> parseTimeM True defaultTimeLocale fieldTimeFormat (T.unpack t) of (Just (LTUUnique time _)) -> Right time - (Just (LTUNone time _)) -> Right time -- FIXME: Should this be an error, too? + (Just (LTUNone _ _)) -> Left MsgIllDefinedUTCTime (Just (LTUAmbiguous _ _ _ _)) -> Left MsgAmbiguousUTCTime Nothing -> Left MsgInvalidDateTimeFormat