Fossil SCM
Fix calculating percentage of committed changesets.
Commit
734febe649058cfd591b35b096250c2f5677da96
Parent
492531e3a86fcc4…
1 file changed
+1
-1
+1
-1
| --- tools/import-cvs.tcl | ||
| +++ tools/import-cvs.tcl | ||
| @@ -137,11 +137,11 @@ | ||
| 137 | 137 | } |
| 138 | 138 | |
| 139 | 139 | proc import {cset} { |
| 140 | 140 | global tot nto nosign ntrunk |
| 141 | 141 | Write info " Importing $cset [string repeat = [expr {60 - [string length $cset]}]]" |
| 142 | - Write info " At $nto/$ntrunk ([format %.2f [expr {double($nto)/$ntrunk}]]%)" | |
| 142 | + Write info " At $nto/$ntrunk ([format %.2f [expr {$nto*100.0/$ntrunk}]]%)" | |
| 143 | 143 | |
| 144 | 144 | set usec [lindex [time { |
| 145 | 145 | foreach {uuid ad rm ch} [fossil::commit cvs2fossil $nosign \ |
| 146 | 146 | [cvs::wssetup $cset] \ |
| 147 | 147 | ::cvs::wsignore] break |
| 148 | 148 |
| --- tools/import-cvs.tcl | |
| +++ tools/import-cvs.tcl | |
| @@ -137,11 +137,11 @@ | |
| 137 | } |
| 138 | |
| 139 | proc import {cset} { |
| 140 | global tot nto nosign ntrunk |
| 141 | Write info " Importing $cset [string repeat = [expr {60 - [string length $cset]}]]" |
| 142 | Write info " At $nto/$ntrunk ([format %.2f [expr {double($nto)/$ntrunk}]]%)" |
| 143 | |
| 144 | set usec [lindex [time { |
| 145 | foreach {uuid ad rm ch} [fossil::commit cvs2fossil $nosign \ |
| 146 | [cvs::wssetup $cset] \ |
| 147 | ::cvs::wsignore] break |
| 148 |
| --- tools/import-cvs.tcl | |
| +++ tools/import-cvs.tcl | |
| @@ -137,11 +137,11 @@ | |
| 137 | } |
| 138 | |
| 139 | proc import {cset} { |
| 140 | global tot nto nosign ntrunk |
| 141 | Write info " Importing $cset [string repeat = [expr {60 - [string length $cset]}]]" |
| 142 | Write info " At $nto/$ntrunk ([format %.2f [expr {$nto*100.0/$ntrunk}]]%)" |
| 143 | |
| 144 | set usec [lindex [time { |
| 145 | foreach {uuid ad rm ch} [fossil::commit cvs2fossil $nosign \ |
| 146 | [cvs::wssetup $cset] \ |
| 147 | ::cvs::wsignore] break |
| 148 |