From 17c9725bc87ce56409853a1eb5b98c93afc024c0 Mon Sep 17 00:00:00 2001
From: George Thomas <georgefsthomas@gmail.com>
Date: Thu, 27 Apr 2023 11:29:57 +0100
Subject: [PATCH] json fix

---
 primer/src/Primer/JSON.hs | 11 ++++++++---
 1 file changed, 8 insertions(+), 3 deletions(-)

diff --git a/primer/src/Primer/JSON.hs b/primer/src/Primer/JSON.hs
index d72dec9a6..ef7a17428 100644
--- a/primer/src/Primer/JSON.hs
+++ b/primer/src/Primer/JSON.hs
@@ -13,8 +13,7 @@ import Data.Aeson (
   ToJSON,
   ToJSONKey,
  )
-import Deriving.Aeson (CustomJSON (..))
-import Deriving.Aeson.Stock (Vanilla)
+import Deriving.Aeson (CustomJSON (..), OmitNothingFields)
 
 -- | A type for Primer API JSON encodings.
 --
@@ -43,4 +42,10 @@ import Deriving.Aeson.Stock (Vanilla)
 --
 -- * @SumTwoElemArray@ is unsupported by openapi3 as it is unrepresentable in
 --   a schema.
-type PrimerJSON a = Vanilla a
+type PrimerJSON a =
+  CustomJSON
+    '[ -- This protects some clients (e.g. TypeScript) from spurious equality failures
+       -- due to null-vs-omitted inconsistency.
+       OmitNothingFields
+     ]
+    a