Tweak introspection to reflect previous change

2025-09-23 04:24:31 +02:00 · 2024-05-04 00:27:26 +02:00 · 2024-05-04 00:27:26 +02:00 · 51bf1ebd4d
commit 51bf1ebd4d
parent b3e0a07460
1 changed files with 41 additions and 36 deletions
--- a/source/AirGQL/Introspection.hs
+++ b/source/AirGQL/Introspection.hs
@ -1326,6 +1326,10 @@ getSchemaFieldOutput dbId conn accessMode tables = do
        ReadOnly -> Null
        WriteOnly -> obj
        ReadAndWrite -> obj
+      requiresRead obj = case accessMode of
+        ReadOnly -> Null
+        WriteOnly -> obj
+        ReadAndWrite -> obj

    pure $
      customRowTypes
@ -1379,7 +1383,8 @@ getSchemaFieldOutput dbId conn accessMode tables = do
                                      ]
                                )
                              ]
-                        , Object $
+                        , requiresRead $
+                            Object $
                              HashMap.fromList
                                [ ("name", "returning")
                                ,