Skip to content

Commit b2e06d5

Browse files
committed
_activate_contents: fix reporting of conflicting paths
1 parent ef2bc78 commit b2e06d5

1 file changed

Lines changed: 2 additions & 2 deletions

File tree

src/registry2.0/portimage.tcl

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -757,12 +757,12 @@ proc _activate_contents {port {rename_list {}}} {
757757
set conflicting_paths [dict get $conflicts_port_to_paths $conflicting_port]
758758
set pathcounter 0
759759
set pathtotal [llength $conflicting_paths]
760-
foreach {_ actual_path} $conflicting_paths {
760+
foreach p $conflicting_paths {
761761
if {$pathcounter >= 3 && $pathtotal > 4} {
762762
append msg " (... [expr {$pathtotal - $pathcounter}] more not shown)\n"
763763
break
764764
}
765-
append msg " ${actual_path}\n"
765+
append msg " [lindex $p 1]\n"
766766
incr pathcounter
767767
}
768768
}

0 commit comments

Comments
 (0)