WebSVN – Koakuma – Diff – /trunk/koakuma.cgi.in

 #!/usr/bin/env tclsh
-# $Id: koakuma.cgi.in 6 2024-10-01 22:57:18Z nishi $
+# $Id: koakuma.cgi.in 11 2024-10-02 00:56:50Z nishi $
 set KOAKUMA_VERSION "1.00"
 set components ""
 proc exiting {code} {
 								keyVCS {valueString "$projvcs"}
 								keyURL {valueString "$url"}
+							}
+						}
 						write_db "[$xmldoc asXML]"
+						file mkdir "@@PREFIX@@/lib/koakuma/db/data/$projname"
 						close_projects
+					}
+				}
+			}
 			rputs ""
 		close_projects
 		if { "$has_project" != "" } {
 			add_toc "Description"
 			tputs "[html_escape "$has_project"]"
+			add_toc "Details"
+			tputs	"<table border=\"0\">"
+			tputs	"	<tr>"
+			tputs	"		<th>"
+			tputs	"			Last run"
+			tputs	"		</th>"
+			tputs	"		<td>"
+			if { [file exists "@@PREFIX@@/lib/koakuma/db/data/$projname/lastrun"] } {
+			} else {
+				tputs "Was never ran"
+			}
+			tputs	"			"
+			tputs	"		</td>"
+			tputs	"	</tr>"
+			tputs	"</table>"
 			rputs ""
 			start_html "Project: $projname" 1
 			rputs "$content"
 			end_html 1

Subversion Repositories Koakuma