From c97039dd9674c68d7c325b5f9d31082e483dedf7 Mon Sep 17 00:00:00 2001
From: Brian Hicks <brian@brianthicks.com>
Date: Tue, 23 Apr 2024 22:33:54 -0500
Subject: [PATCH] regenerate examples

---
 README.md                                     |  3 +-
 examples/jwt_schema/Main/Flags.elm            |  3 +-
 .../generate.out/src/Foo/Bar/Main/Flags.elm   |  4 ++-
 .../generate.out/src/Foo/Bar/Main/Ports.elm   | 35 ++++++++++++++-----
 4 files changed, 34 insertions(+), 11 deletions(-)

diff --git a/README.md b/README.md
index b915b30..0a8b669 100644
--- a/README.md
+++ b/README.md
@@ -99,7 +99,8 @@ type alias Flags =
 
 flagsDecoder : Decoder Flags
 flagsDecoder =
-    Decode.fail "TODO: record"
+    Decode.map Flags
+        (Decode.field "currentJwt" (Decode.nullable Decode.string))
 
 ```
 
diff --git a/examples/jwt_schema/Main/Flags.elm b/examples/jwt_schema/Main/Flags.elm
index 7e0f136..c014c5b 100644
--- a/examples/jwt_schema/Main/Flags.elm
+++ b/examples/jwt_schema/Main/Flags.elm
@@ -11,4 +11,5 @@ type alias Flags =
 
 flagsDecoder : Decoder Flags
 flagsDecoder =
-    Decode.fail "TODO: record"
+    Decode.map Flags
+        (Decode.field "currentJwt" (Decode.nullable Decode.string))
diff --git a/tests/cmd/generate.out/src/Foo/Bar/Main/Flags.elm b/tests/cmd/generate.out/src/Foo/Bar/Main/Flags.elm
index c12c3fb..7ec8c91 100644
--- a/tests/cmd/generate.out/src/Foo/Bar/Main/Flags.elm
+++ b/tests/cmd/generate.out/src/Foo/Bar/Main/Flags.elm
@@ -37,4 +37,6 @@ type alias Flags =
 
 flagsDecoder : Decoder Flags
 flagsDecoder =
-    Decode.fail "TODO: record"
+    Decode.map2 Flags
+        (Decode.field "currentTimeMillis" Decode.float)
+        (Decode.field "notificationPermission" notificationPermissionDecoder)
diff --git a/tests/cmd/generate.out/src/Foo/Bar/Main/Ports.elm b/tests/cmd/generate.out/src/Foo/Bar/Main/Ports.elm
index 0f05cb6..d142f73 100644
--- a/tests/cmd/generate.out/src/Foo/Bar/Main/Ports.elm
+++ b/tests/cmd/generate.out/src/Foo/Bar/Main/Ports.elm
@@ -11,7 +11,8 @@ type alias AddNewPingAt =
 
 addNewPingAtDecoder : Decoder AddNewPingAt
 addNewPingAtDecoder =
-    Decode.fail "TODO: record"
+    Decode.map AddNewPingAt
+        (Decode.field "value" Decode.float)
 
 
 type alias SetMinutesPerPing =
@@ -21,7 +22,8 @@ type alias SetMinutesPerPing =
 
 setMinutesPerPingDecoder : Decoder SetMinutesPerPing
 setMinutesPerPingDecoder =
-    Decode.fail "TODO: record"
+    Decode.map SetMinutesPerPing
+        (Decode.field "value" Decode.float)
 
 
 type alias SetTagForPing =
@@ -32,7 +34,9 @@ type alias SetTagForPing =
 
 setTagForPingDecoder : Decoder SetTagForPing
 setTagForPingDecoder =
-    Decode.fail "TODO: record"
+    Decode.map2 SetTagForPing
+        (Decode.field "index" Decode.float)
+        (Decode.field "value" (Decode.nullable Decode.string))
 
 
 type ChangeDocument
@@ -69,7 +73,10 @@ type alias PingV1 =
 
 pingV1Decoder : Decoder PingV1
 pingV1Decoder =
-    Decode.fail "TODO: record"
+    Decode.map3 PingV1
+        (Decode.field "custom" (Decode.dict Decode.string))
+        (Decode.field "tag" (Decode.nullable Decode.string))
+        (Decode.field "time" Decode.int)
 
 
 type PingsElements
@@ -96,7 +103,8 @@ type alias SettingsV1 =
 
 settingsV1Decoder : Decoder SettingsV1
 settingsV1Decoder =
-    Decode.fail "TODO: record"
+    Decode.map SettingsV1
+        (Decode.field "minutesPerPing" Decode.int)
 
 
 type Settings
@@ -124,7 +132,9 @@ type alias DocV1 =
 
 docV1Decoder : Decoder DocV1
 docV1Decoder =
-    Decode.fail "TODO: record"
+    Decode.map2 DocV1
+        (Decode.field "pings" (Decode.list pingsElementsDecoder))
+        (Decode.field "settings" settingsDecoder)
 
 
 type DocFromAutomerge
@@ -191,7 +201,14 @@ type alias NotificationOptions =
 
 notificationOptionsDecoder : Decoder NotificationOptions
 notificationOptionsDecoder =
-    Decode.fail "TODO: record"
+    Decode.map7 NotificationOptions
+        (Decode.field "badge" (Decode.nullable Decode.string))
+        (Decode.field "body" (Decode.nullable Decode.string))
+        (Decode.field "icon" (Decode.nullable Decode.string))
+        (Decode.field "lang" (Decode.nullable Decode.string))
+        (Decode.field "requireInteraction" (Decode.nullable Decode.bool))
+        (Decode.field "silent" (Decode.nullable Decode.bool))
+        (Decode.field "tag" (Decode.nullable Decode.string))
 
 
 type alias SendNotification =
@@ -202,4 +219,6 @@ type alias SendNotification =
 
 sendNotificationDecoder : Decoder SendNotification
 sendNotificationDecoder =
-    Decode.fail "TODO: record"
+    Decode.map2 SendNotification
+        (Decode.field "options" notificationOptionsDecoder)
+        (Decode.field "title" Decode.string)