Check-in [8e3012423b]
Not logged in
Overview

SHA1 Hash:8e3012423b2db720c1c09b01a8cf2df53f9743bb
Date: 2007-11-29 06:23:30
User: aku
Comment:Updated the code printing the changeset statistics to know about change to the changeset types.
Timelines: ancestors | descendants | both | trunk
Other Links: files | ZIP archive | manifest

Tags And Properties
Changes
[hide diffs]

Modified tools/cvs2fossil/lib/c2f_repository.tcl from [9dd75e0c53] to [6b33138cb4].

@@ -279,18 +279,20 @@
     # pass IV+ results
     typemethod printcsetstatistics {} {
 	log write 2 repository "Changeset statistics"
 	# number of revisions, symbols, repository wide, and per project ...
 
-	set ccount [state one { SELECT COUNT (*) FROM changeset                }]
+	set ccount [state one { SELECT COUNT (*) FROM changeset                 }]
 	set rcount [state one { SELECT COUNT (*) FROM changeset WHERE type = 0 }]
-	set scount [state one { SELECT COUNT (*) FROM changeset WHERE type = 1 }]
-	set fmt %[string length [max [list $ccount $rcount $scount]]]s
+	set tcount [state one { SELECT COUNT (*) FROM changeset WHERE type = 1 }]
+	set bcount [state one { SELECT COUNT (*) FROM changeset WHERE type = 2 }]
+	set fmt %[string length [max [list $ccount $rcount $tcount $bcount]]]s
 
 	log write 2 repository "Statistics: [format $fmt $ccount] [sp $ccount changeset]"
 	log write 2 repository "Statistics: [format $fmt $rcount] [sp $rcount {revision changeset}]"
-	log write 2 repository "Statistics: [format $fmt $scount] [sp $scount {symbol changeset}]"
+	log write 2 repository "Statistics: [format $fmt $tcount] [sp $tcount {tag symbol changeset}]"
+	log write 2 repository "Statistics: [format $fmt $bcount] [sp $bcount {branch symbol changeset}]"
 
 	set prlist [TheProjects]
 	set npr [llength $prlist]
 
 	if {$npr > 1} {
@@ -307,15 +309,17 @@
 	    regsub -all {[^	]} $prefix { } blanks
 	    set sep " : "
 
 	    set ccount [state one { SELECT COUNT (*) FROM changeset WHERE pid = $pid              }]
 	    set rcount [state one { SELECT COUNT (*) FROM changeset WHERE pid = $pid AND type = 0 }]
-	    set scount [state one { SELECT COUNT (*) FROM changeset WHERE pid = $pid AND type = 1 }]
+	    set tcount [state one { SELECT COUNT (*) FROM changeset WHERE pid = $pid AND type = 1 }]
+	    set bcount [state one { SELECT COUNT (*) FROM changeset WHERE pid = $pid AND type = 2 }]
 
 	    log write 2 repository "Statistics: $prefix$sep[format $fmt $ccount] [sp $ccount changeset]"
 	    log write 2 repository "Statistics: $blanks$sep[format $fmt $rcount] [sp $rcount {revision changeset}]"
-	    log write 2 repository "Statistics: $blanks$sep[format $fmt $scount] [sp $scount {symbol changeset}]"
+	    log write 2 repository "Statistics: $blanks$sep[format $fmt $tcount] [sp $tcount {tag symbol changeset}]"
+	    log write 2 repository "Statistics: $blanks$sep[format $fmt $bcount] [sp $bcount {branch symbol changeset}]"
 	}
 	return
     }
 
     # # ## ### ##### ######## #############