Fix latest revision only bug.

Author: hamishmack

src/Distribution/Hackage/DB/Unparsed.hs

@@ -57,7 +57,7 @@ builder = Builder
   , insertCabalFile         = \pn v _ buf -> let f Nothing   = PackageData mempty (Map.singleton v new)
                                                  f (Just pd) = pd { versions = Map.insertWith g v new (versions pd) }
                                                  new         = VersionData [toStrict buf] mempty
-                                                 g _ old     = old { cabalFileRevisions = cabalFileRevisions new }
+                                                 g _ old     = old { cabalFileRevisions = cabalFileRevisions old <> cabalFileRevisions new }
                                              in pure . Map.alter (Just . f) pn
 
   , insertMetaFile          = \pn v _ buf -> let f Nothing   = PackageData mempty (Map.singleton v new)