Remove question mark in Data.Map instance

codedownio · Dec 6, 2024 · 0cf43e7 · 0cf43e7
1 parent 35a6414
commit 0cf43e7
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/Data/Aeson/TypeScript/Instances.hs b/src/Data/Aeson/TypeScript/Instances.hs
@@ -177,8 +177,8 @@ instance (TypeScript a, TypeScript b, A.ToJSONKey a) => TypeScript (Map a b) whe
     let k = getTypeScriptKeyType @a Proxy
         v = getTypeScriptType @b Proxy
     in const $ case A.toJSONKey @a of
-      A.ToJSONKeyText{} -> "{[k in " <> k <> "]?: " <> v <> "}"
-      A.ToJSONKeyValue{} -> getTypeScriptType @[(a, b)] Proxy
+      A.ToJSONKeyText {} -> "{[k in " <> k <> "]: " <> v <> "}"
+      A.ToJSONKeyValue {} -> getTypeScriptType @[(a, b)] Proxy
   getParentTypes = const $ L.nub [TSType @a Proxy, TSType @b Proxy]
 
 instance (TypeScript a, TypeScript b, A.ToJSONKey a) => TypeScript (HashMap a b) where