Subversion Repositories Koakuma

Rev

Rev 3 | Rev 13 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 nishi 1 
# $Id: vcs_cvs.tcl 6 2024-10-01 22:57:18Z nishi $
6 nishi 2 
lappend components "CVS" "CVS Integration" "1.00" "VCS"
3 nishi 3 
 
4 
proc CVS_info {} {
5 
	regexp {[0-9]+\.[0-9]+\.[0-9]+} "[exec cvs --version]" version
6 
	add_toc2 "CVS"
7 
	tputs	"<table border=\"0\">"
8 
	tputs	"	<tr>"
9 
	tputs	"		<th>"
10 
	tputs	"			Version"
11 
	tputs	"		</th>"
12 
	tputs	"		<td>"
13 
	tputs	"			$version"
14 
	tputs	"		</td>"
15 
	tputs	"	</tr>"
16 
	tputs	"</table>"
17 
}