<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/2cc75ca3adbcf91affdc3063520007e8dd6f17ed">https://github.com/macports/macports-base/commit/2cc75ca3adbcf91affdc3063520007e8dd6f17ed</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 2cc75ca3 Word wrap print_tickets_url output
</span>2cc75ca3 is described below
<span style='display:block; white-space:pre;color:#808000;'>commit 2cc75ca3adbcf91affdc3063520007e8dd6f17ed
</span>Author: Joshua Root <jmr@macports.org>
AuthorDate: Sat Apr 17 14:42:44 2021 +1000
<span style='display:block; white-space:pre;color:#404040;'> Word wrap print_tickets_url output
</span>---
src/port/port.tcl | 10 ++++++----
1 file changed, 6 insertions(+), 4 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 85b6b100..9100c803 100755
</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;'>@@ -116,7 +116,8 @@ proc break_softcontinue { msg status name_status } {
</span> # show the URL for the ticket reporting instructions
proc print_tickets_url {args} {
if {${macports::prefix} ne "/usr/local" && ${macports::prefix} ne "/usr"} {
<span style='display:block; white-space:pre;background:#ffe0e0;'>- ui_error "Follow https://guide.macports.org/#project.tickets if you believe there is a bug."
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ set len [string length [macports::ui_prefix_default error]]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ ui_error [wrap "Follow https://guide.macports.org/#project.tickets if you believe there is a bug." -${len}]
</span> }
}
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -504,18 +505,19 @@ proc wrap {string maxlen {indent ""} {indentfirstline 1}} {
</span> # @see wrap
#
# @param line input line
<span style='display:block; white-space:pre;background:#ffe0e0;'>-# @param maxlen text width (0 defaults to current terminal width)
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+# @param maxlen text width (0 defaults to current terminal width,
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+# negative numbers reduce width from terminal's)
</span> # @param indent prepend to every line
# @return wrapped string
proc wrapline {line maxlen {indent ""} {indentfirstline 1}} {
global env
<span style='display:block; white-space:pre;background:#ffe0e0;'>- if {$maxlen == 0} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ if {$maxlen <= 0} {
</span> if {![info exists env(COLUMNS)]} {
# no width for wrapping
return $string
}
<span style='display:block; white-space:pre;background:#ffe0e0;'>- set maxlen $env(COLUMNS)
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ set maxlen [expr {$env(COLUMNS) + $maxlen}]
</span> }
set string [split $line " "]
</pre><pre style='margin:0'>
</pre>