Skip to content

Commit

Permalink
Stop using polymorphic comparison to remove repositories
Browse files Browse the repository at this point in the history
  • Loading branch information
kit-ty-kate authored and rjbou committed Nov 29, 2024
1 parent 6222549 commit bd79d97
Showing 1 changed file with 4 additions and 1 deletion.
5 changes: 4 additions & 1 deletion src/client/opamCommands.ml
Original file line number Diff line number Diff line change
Expand Up @@ -2426,7 +2426,10 @@ let repository cli =
`Ok ()
| Some `remove, names ->
let names = List.map OpamRepositoryName.of_string names in
let rm = List.filter (fun n -> not (List.mem n names)) in
let rm =
List.filter (fun n ->
not (List.exists (OpamRepositoryName.equal n) names))
in
let full_wipe = List.mem `All scope in
let global = global || full_wipe in
let gt =
Expand Down

0 comments on commit bd79d97

Please sign in to comment.