<pre style='margin:0'>
Joshua Root (jmroot) pushed a commit to branch master
in repository macports-base.
</pre>
<p><a href="https://github.com/macports/macports-base/commit/9a23db2fde81660ca42425ae0647a4f347571f45">https://github.com/macports/macports-base/commit/9a23db2fde81660ca42425ae0647a4f347571f45</a></p>
<pre style="white-space: pre; background: #F8F8F8">The following commit(s) were added to refs/heads/master by this push:
<span style='display:block; white-space:pre;color:#404040;'> new 9a23db2 portindex: Restore special $prefix handling
</span>9a23db2 is described below
<span style='display:block; white-space:pre;color:#808000;'>commit 9a23db2fde81660ca42425ae0647a4f347571f45
</span>Author: Clemens Lang <cal@macports.org>
AuthorDate: Wed Dec 28 17:08:26 2016 +0100
<span style='display:block; white-space:pre;color:#404040;'> portindex: Restore special $prefix handling
</span><span style='display:block; white-space:pre;color:#404040;'>
</span><span style='display:block; white-space:pre;color:#404040;'> This avoids expanded values for ${prefix} in the PortIndex.
</span><span style='display:block; white-space:pre;color:#404040;'>
</span><span style='display:block; white-space:pre;color:#404040;'> Closes: https://trac.macports.org/ticket/53169
</span><span style='display:block; white-space:pre;color:#404040;'> See: https://trac.macports.org/ticket/17182
</span>---
src/port/portindex.tcl | 19 ++++++++++++++-----
1 file changed, 14 insertions(+), 5 deletions(-)
<span style='display:block; white-space:pre;color:#808080;'>diff --git a/src/port/portindex.tcl b/src/port/portindex.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index a8646ee..1a76751 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/src/port/portindex.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/src/port/portindex.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -81,10 +81,19 @@ proc _open_port {portinfo_name portdir absportdir port_options_name {subport {}}
</span> upvar $portinfo_name portinfo
upvar $port_options_name port_options
<span style='display:block; white-space:pre;background:#ffe0e0;'>- if {$subport eq {}} {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- set interp [mportopen file://$absportdir $port_options]
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- } else {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>- set interp [mportopen file://$absportdir [concat $port_options subport $subport]]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ # Make sure $prefix expands to '${prefix}' so that the PortIndex is
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ # portable across prefixes, see https://trac.macports.org/ticket/53169 and
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ # https://trac.macports.org/ticket/17182.
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ try -pass_signal {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ set macports::prefix {${prefix}}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ if {$subport eq {}} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ set interp [mportopen file://$absportdir $port_options]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ } else {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ set interp [mportopen file://$absportdir [concat $port_options subport $subport]]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ }
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ } finally {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ # Restore prefix to the previous value
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ set macports::prefix $save_prefix
</span> }
if {[array exists portinfo]} {
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -98,7 +107,7 @@ proc _open_port {portinfo_name portdir absportdir port_options_name {subport {}}
</span>
proc pindex {portdir} {
global oldmtime newest qindex directory stats full_reindex \
<span style='display:block; white-space:pre;background:#ffe0e0;'>- ui_options port_options save_prefix
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ ui_options port_options
</span>
set qname [string tolower [file tail $portdir]]
set absportdir [file join $directory $portdir]
</pre><pre style='margin:0'>
</pre>