We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent ef2bc78 commit b2e06d5Copy full SHA for b2e06d5
1 file changed
src/registry2.0/portimage.tcl
@@ -757,12 +757,12 @@ proc _activate_contents {port {rename_list {}}} {
757
set conflicting_paths [dict get $conflicts_port_to_paths $conflicting_port]
758
set pathcounter 0
759
set pathtotal [llength $conflicting_paths]
760
- foreach {_ actual_path} $conflicting_paths {
+ foreach p $conflicting_paths {
761
if {$pathcounter >= 3 && $pathtotal > 4} {
762
append msg " (... [expr {$pathtotal - $pathcounter}] more not shown)\n"
763
break
764
}
765
- append msg " ${actual_path}\n"
+ append msg " [lindex $p 1]\n"
766
incr pathcounter
767
768
0 commit comments