diff --git a/unison-share-api/src/Unison/Server/Orphans.hs b/unison-share-api/src/Unison/Server/Orphans.hs index 8455e265f8..a3d8ce22c8 100644 --- a/unison-share-api/src/Unison/Server/Orphans.hs +++ b/unison-share-api/src/Unison/Server/Orphans.hs @@ -169,6 +169,9 @@ instance ToJSON Name where toEncoding = toEncoding . Name.toText toJSON = toJSON . Name.toText +instance ToJSONKey Name where + toJSONKey = contramap Name.toText (toJSONKey @Text) + instance ToSchema Name where declareNamedSchema _ = declareNamedSchema (Proxy @Text)