<pre style='margin:0'>
Rainer Müller (raimue) pushed a commit to branch master
in repository macports-base.

</pre>
<p><a href="https://github.com/macports/macports-base/commit/01d98dbdc0abeb4106e59c939f2421a05c1b8b2f">https://github.com/macports/macports-base/commit/01d98dbdc0abeb4106e59c939f2421a05c1b8b2f</a></p>
<pre style="white-space: pre; background: #F8F8F8"><span style='display:block; white-space:pre;color:#808000;'>commit 01d98dbdc0abeb4106e59c939f2421a05c1b8b2f
</span>Author: Rainer Müller <raimue@macports.org>
AuthorDate: Tue Feb 7 18:33:58 2017 +0100

<span style='display:block; white-space:pre;color:#404040;'>    ui_ask_*: Eliminate special port output formatting
</span><span style='display:block; white-space:pre;color:#404040;'>    
</span><span style='display:block; white-space:pre;color:#404040;'>    Instead of formatting the port entry in ui_choice in the port client,
</span><span style='display:block; white-space:pre;color:#404040;'>    pass correctly formatted strings to the ui_ask_* procs and use them
</span><span style='display:block; white-space:pre;color:#404040;'>    unaltered.
</span>---
 src/port/port.tcl                 | 3 +--
 src/registry2.0/portimage.tcl     | 4 ++--
 src/registry2.0/portuninstall.tcl | 6 +++---
 3 files changed, 6 insertions(+), 7 deletions(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/src/port/port.tcl b/src/port/port.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index 8b30f71..ad1e407 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/src/port/port.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/src/port/port.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -5366,8 +5366,7 @@ namespace eval portclient::questions {
</span>         # Print portname or port list suitably
         set i 1
         foreach port $ports {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-            puts -nonewline [format " %*d) " $maxlen $i]
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-            puts [string map {@ " @" ( " ("} $port]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            puts [format " %*d) %s" $maxlen $i $port]
</span>             incr i
         }
     }
<span style='display:block; white-space:pre;color:#808080;'>diff --git a/src/registry2.0/portimage.tcl b/src/registry2.0/portimage.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index b576719..cd519ad 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/src/registry2.0/portimage.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/src/registry2.0/portimage.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -237,9 +237,9 @@ proc _check_registry {name version revision variants} {
</span>             # Asking choice to select option in case of ambiguous activate
             if {[info exists macports::ui_options(questions_singlechoice)]} {
                 if { [$i state] eq "installed" } {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-                    lappend portilist $iname@${iversion}_${irevision}${ivariants}(active)
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                    lappend portilist "$iname @${iversion}_${irevision}${ivariants} (active)"
</span>                 } else {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-                    lappend portilist $iname@${iversion}_${irevision}${ivariants}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                    lappend portilist "$iname @${iversion}_${irevision}${ivariants}"
</span>                 }
             } else {
                 if { [$i state] eq "installed" } {
<span style='display:block; white-space:pre;color:#808080;'>diff --git a/src/registry2.0/portuninstall.tcl b/src/registry2.0/portuninstall.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index 67ee49d..3192c24 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/src/registry2.0/portuninstall.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/src/registry2.0/portuninstall.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -157,9 +157,9 @@ proc uninstall {portname {version ""} {revision ""} {variants 0} {optionslist ""
</span>             # Asking choice to select option in case of ambiguous uninstall
             if {[info exists macports::ui_options(questions_multichoice)]} {
                 if { [$i state] eq "installed" } {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-                    lappend portilist [$i name]@[$i version]_[$i revision][$i variants](active)
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-                } else {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-                    lappend portilist [$i name]@[$i version]_[$i revision][$i variants]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                    lappend portilist "[$i name] @[$i version]_[$i revision][$i variants] (active)"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            } else {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                    lappend portilist "[$i name] @[$i version]_[$i revision][$i variants]"
</span>                 }
             } else {
                 if {[$i state] eq "installed"} {
</pre><pre style='margin:0'>

</pre>