Fix regression on 'opam upgrade <package>' upgrading unrelated things

Regression introduced in 4db0c13, which is dedicated to a different case (functionality of this patch is preserved)
ocaml · Jan 22, 2025 · 8897cd2 · 8897cd2
1 parent f80c027
commit 8897cd2
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/client/opamClient.ml b/src/client/opamClient.ml
@@ -113,7 +113,7 @@ let compute_upgrade_t
         | Some nv -> not (OpamPackage.Set.mem nv (Lazy.force t.available_packages)))
       atoms
   in
-  let criteria = if to_install = [] then `Upgrade else `Default in
+  let criteria = if to_install = [] && all then `Upgrade else `Default in
   if all then
     names,
     OpamSolution.resolve t Upgrade