|
|
|
@ -142,7 +142,7 @@ namespace eval shellrun {
|
|
|
|
|
} else { |
|
|
|
|
set e $::shellrun::runerr |
|
|
|
|
} |
|
|
|
|
append chunk "$e\n" |
|
|
|
|
append chunk "[a+ red light]$e[a+]\n" |
|
|
|
|
} |
|
|
|
|
lappend chunklist [list stderr $chunk] |
|
|
|
|
|
|
|
|
@ -246,7 +246,7 @@ namespace eval shellrun {
|
|
|
|
|
} else { |
|
|
|
|
set o $::shellrun::runout |
|
|
|
|
} |
|
|
|
|
append chunk "$o\n" ;#this newline is the display output separator - always there whether data has trailing newline or not. |
|
|
|
|
append chunk "[a+ white light]$o[a+]\n" ;#this newline is the display output separator - always there whether data has trailing newline or not. |
|
|
|
|
} |
|
|
|
|
lappend chunklist [list stdout $chunk] |
|
|
|
|
|
|
|
|
@ -327,6 +327,10 @@ namespace eval shellrun {
|
|
|
|
|
flush stderr |
|
|
|
|
flush stdout |
|
|
|
|
|
|
|
|
|
if {[dict exists $exitinfo error]} { |
|
|
|
|
#todo - check errorInfo makes sense.. return -code? tailcall? |
|
|
|
|
error [dict get $exitinfo error] |
|
|
|
|
} |
|
|
|
|
|
|
|
|
|
#set x [shellfilter::stack::add stdout var -action sink-locked -settings {-varname ::repl::runxoutput}] |
|
|
|
|
set chunklist [list] |
|
|
|
@ -365,10 +369,6 @@ namespace eval shellrun {
|
|
|
|
|
#return [lindex [list [list stdout $::runout stderr $::runerr {*}$exitinfo] [shellfilter::stack::remove stdout $x][puts -nonewline stdout $pretty][set ::repl::output ""]] 0] |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
if {[dict exists $exitinfo error]} { |
|
|
|
|
#todo - check errorInfo makes sense.. return -code? tailcall? |
|
|
|
|
error [dict get $exitinfo error] |
|
|
|
|
} |
|
|
|
|
if {$nonewline} { |
|
|
|
|
return [list stdout [string trimright $::shellrun::runout \r\n] stderr [string trimright $::shellrun::runerr \r\n] {*}$exitinfo] |
|
|
|
|
} |
|
|
|
|