Index: build/web/building.cgi ================================================================== --- build/web/building.cgi +++ build/web/building.cgi @@ -25,10 +25,11 @@ close $fd array set buildinfo $buildinfo_list set filename $buildinfo(filename) set outfile [file join $workdir $filename] + set logfile "${outfile}.log" } else { set status "Queued" } } @@ -63,9 +64,19 @@ puts "\t" puts "\t
" puts "\t\tStatus: $status
" if {[info exists url]} { -puts "\t\tURL: $url
" + puts "\t\tURL: $url
" +} +if {[info exists logfile]} { + catch { + set fd [open $logfile] + set logdata [read $fd] + close $fd + + + puts "\t\tLog:
\n$logdata" + } } puts "\t" puts "