@@ -40,7 +40,6 @@ import Registry.Range (Range)
4040import Registry.Range as Range
4141import Registry.Version (Version )
4242import Registry.Version as Version
43- import Type.Proxy (Proxy (..))
4443
4544-- | The manifest for a package version, which records critical information for
4645-- | the registry, pursuit, and package managers to use.
@@ -73,13 +72,13 @@ instance Ord Manifest where
7372-- | record sugar.
7473codec :: CJ.Codec Manifest
7574codec = Profunctor .wrapIso Manifest $ CJ .named " Manifest" $ CJ .object
76- $ CJ .recordProp ( Proxy :: _ " name" ) PackageName .codec
77- $ CJ .recordProp ( Proxy :: _ " version" ) Version .codec
78- $ CJ .recordProp ( Proxy :: _ " license" ) License .codec
79- $ CJ .recordPropOptional ( Proxy :: _ " description" ) (Internal.Codec .limitedString 300 )
80- $ CJ .recordProp ( Proxy :: _ " location" ) Location .codec
81- $ CJ .recordPropOptional ( Proxy :: _ " owners" ) (CJ.Common .nonEmptyArray Owner .codec)
82- $ CJ .recordPropOptional ( Proxy :: _ " includeFiles" ) (CJ.Common .nonEmptyArray CJ.Common .nonEmptyString)
83- $ CJ .recordPropOptional ( Proxy :: _ " excludeFiles" ) (CJ.Common .nonEmptyArray CJ.Common .nonEmptyString)
84- $ CJ .recordProp ( Proxy :: _ " dependencies" ) (Internal.Codec .packageMap Range .codec)
75+ $ CJ .recordProp @ " name" PackageName .codec
76+ $ CJ .recordProp @ " version" Version .codec
77+ $ CJ .recordProp @ " license" License .codec
78+ $ CJ .recordPropOptional @ " description" (Internal.Codec .limitedString 300 )
79+ $ CJ .recordProp @ " location" Location .codec
80+ $ CJ .recordPropOptional @ " owners" (CJ.Common .nonEmptyArray Owner .codec)
81+ $ CJ .recordPropOptional @ " includeFiles" (CJ.Common .nonEmptyArray CJ.Common .nonEmptyString)
82+ $ CJ .recordPropOptional @ " excludeFiles" (CJ.Common .nonEmptyArray CJ.Common .nonEmptyString)
83+ $ CJ .recordProp @ " dependencies" (Internal.Codec .packageMap Range .codec)
8584 $ CJ .record
0 commit comments