Update for flipped order of args for PackageIndex.insert

cabal-install/Hackage/Install.hs

@@ -139,7 +139,7 @@ installLocalPackage verbosity packageDB repos comp conf miscOptions configFlags
       let -- The trick is, we add the local package to the available index and
           -- then ask to resolve a dependency on exactly that package. So the
           -- resolver ends up having to pick the local package.
-          available' = PackageIndex.insert available localPackage
+          available' = PackageIndex.insert localPackage available
           localPackage = AvailablePackage {
               packageInfoId                = packageId desc,
               Available.packageDescription = desc,

cabal-install/Hackage/InstallPlan.hs

@@ -261,7 +261,7 @@ completed :: PackageIdentifier
           -> InstallPlan buildResult -> InstallPlan buildResult
 completed pkgid plan =
   case PackageIndex.lookupPackageId index pkgid of
-    Just (Configured cp) -> plan { planIndex = PackageIndex.insert index (Installed cp) }
+    Just (Configured cp) -> plan { planIndex = PackageIndex.insert (Installed cp) index }
     _ -> error "InstallPlan.completed: internal error; cannot mark package as completed"
   where index = planIndex plan