From f870ee0b2ac4c49492a8fe46fa591ba29dbd768a Mon Sep 17 00:00:00 2001
From: Owen Graves <owen@flipstone.com>
Date: Fri, 20 Dec 2024 09:20:22 -0600
Subject: [PATCH] Fix useOptionalNullable

---
 json-fleece-codegen-util/src/Fleece/CodeGenUtil.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/json-fleece-codegen-util/src/Fleece/CodeGenUtil.hs b/json-fleece-codegen-util/src/Fleece/CodeGenUtil.hs
index 04c6ed8..3df2c97 100644
--- a/json-fleece-codegen-util/src/Fleece/CodeGenUtil.hs
+++ b/json-fleece-codegen-util/src/Fleece/CodeGenUtil.hs
@@ -1797,7 +1797,7 @@ fieldFleeceSchemaCode =
 fleeceFieldFunction :: FleeceSchemaField -> Bool -> HC.HaskellCode
 fleeceFieldFunction field useOptionalNullableBool
   | fieldRequired field = fleeceCoreVar "required"
-  | useOptionalNullableBool = fleeceCoreVar "optionalNullable"
+  | useOptionalNullableBool = fleeceCoreVar "optionalNullable" <> " " <> fleeceCoreVar "OmitKey"
   | otherwise = fleeceCoreVar "optional"
 
 mkFleeceSchemaField ::