diff --git a/src/dune_pkg/pin.ml b/src/dune_pkg/pin.ml index 4555f877a40..0cb6cae103a 100644 --- a/src/dune_pkg/pin.ml +++ b/src/dune_pkg/pin.ml @@ -86,7 +86,7 @@ module DB = struct [ Pp.textf "package %S is defined in more than one source" (Package_name.to_string name) - ; Pp.textf "it is also defined in %s" (Loc.to_file_colon_line (fst lhs).loc) + ; Pp.textf "it is also defined in %s" (Loc.to_file_colon_line (fst rhs).loc) ]) ; context } diff --git a/test/blackbox-tests/test-cases/pkg/pin-stanza/override-single-workspace.t b/test/blackbox-tests/test-cases/pkg/pin-stanza/override-single-workspace.t index ad777b9d5f3..bbb5d1862c5 100644 --- a/test/blackbox-tests/test-cases/pkg/pin-stanza/override-single-workspace.t +++ b/test/blackbox-tests/test-cases/pkg/pin-stanza/override-single-workspace.t @@ -68,5 +68,5 @@ select a priority: 4 | (package (name bar))) ^^^^^^^^^^^^^^^^^^^^ Error: package "bar" is defined in more than one source - it is also defined in prj1/dune-project:4 + it is also defined in prj2/dune-project:4 [1]