Subversion Repositories Koakuma

Rev

Rev 35 | Rev 37 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 35 Rev 36
Line 1... Line 1...
1 
#!/usr/bin/env tclsh
 1 
#!/usr/bin/env tclsh
2 
# $Id: koakuma.cgi.in 35 2024-10-02 09:40:33Z nishi $
 2 
# $Id: koakuma.cgi.in 36 2024-10-02 09:43:12Z nishi $
3 
 
 3 
 
4 
set KOAKUMA_VERSION "1.00"
 4 
set KOAKUMA_VERSION "1.00"
5 
set components ""
 5 
set components ""
6 
 
 6 
 
7 
chan configure stdout -buffering none
 7 
chan configure stdout -buffering none
Line 480... Line 480...
480 
								set fid [open "@@PREFIX@@/lib/koakuma/db/data/$projname/build-$count/log" "w"]
 480 
								set fid [open "@@PREFIX@@/lib/koakuma/db/data/$projname/build-$count/log" "w"]
481 
								set fail 0
 481 
								set fail 0
482 
 
 482 
 
483 
								dup $fid stdout
 483 
								dup $fid stdout
484 
								dup $fid stderr
 484 
								dup $fid stderr
485
485 
 
- 
 
 486 
								puts "Build trigger description: $builddesc"
486 
								puts "===== Checkout"
 487 
								puts "===== Checkout"
487 
								puts "Using VCS: $use_vcs"
 488 
								puts "Using VCS: $use_vcs"
488 
								if { [llength [info procs "${use_vcs}_repository"]] == 0 } {
 489 
								if { [llength [info procs "${use_vcs}_repository"]] == 0 } {
489 
									puts "Component internal failure"
 490 
									puts "Component internal failure"
490 
									set fail 1
 491 
									set fail 1