fixup! Add uploaded_at field to the package JSON API

Author: Kleidukos

src/Distribution/Server/Features/PackageInfoJSON.hs

@@ -148,6 +148,7 @@ getBasicDescription (CabalFileText cf) metadataRev =
                                 PkgDescr.licenseRaw pkgd
       pbd_homepage          = T.pack . fromShortText $ PkgDescr.homepage pkgd
       pbd_metadata_revision = metadataRev
+      pbd_uploaded_at = 
       in
       return $ PackageBasicDescription {..}
     (_, Left (_, perrs)) ->

src/Distribution/Server/Features/PackageInfoJSON/State.hs

@@ -41,8 +41,7 @@ import qualified Distribution.Parsec as Parsec
 
 import qualified Distribution.Server.Features.PreferredVersions as Preferred
 import           Distribution.Server.Framework.MemSize          (MemSize,
-                                                                 memSize,
-                                                                 memSize7)
+                                                                 memSize, memSize8)
 
 
 -- | Basic information about a package. These values are
@@ -230,8 +229,8 @@ deriveSafeCopy 0 'base ''PackageInfoState
 
 instance MemSize PackageBasicDescription where
   memSize PackageBasicDescription{..} =
-    memSize7 (Pretty.prettyShow pbd_license) pbd_copyright pbd_synopsis
-             pbd_description pbd_author pbd_homepage pbd_metadata_revision
+    memSize8 (Pretty.prettyShow pbd_license) pbd_copyright pbd_synopsis
+             pbd_description pbd_author pbd_homepage pbd_metadata_revision pbd_uploaded_at
 
 instance MemSize PackageVersions where
   memSize (PackageVersions ps) = getSum $