Fix DateTime.fromString

unisonweb · Aug 15, 2023 · 5c68231 · 5c68231
1 parent d096783
commit 5c68231
Showing 1 changed file with 5 additions and 4 deletions.
diff --git a/src/UI/DateTime.elm b/src/UI/DateTime.elm
@@ -5,8 +5,8 @@ module UI.DateTime exposing
  ( DateTime
  , DateTimeFormat(..)
  , decode
+ , fromISO8601
  , fromPosix
- , fromString
  , isSameDay
  , toISO8601
  , toPosix
@@ -55,10 +55,11 @@ decode =
  Decode.map DateTime Iso8601.decoder
 
 
-fromString : String -> Maybe DateTime
-fromString s =
+fromISO8601 : String -> Maybe DateTime
+fromISO8601 s =
  s
- |> Decode.decodeString decode
+ |> Iso8601.toTime
+ |> Result.map DateTime
  |> Result.toMaybe