Fossil SCM
Fixed bug in new changeset code, tagged and untagged item lists went out of sync.
Commit
facb4a8721e735bfc386a4a472d4ef72eec1b5c2
Parent
b42cff97e319c20…
1 file changed
+2
-1
| --- tools/cvs2fossil/lib/c2f_prev.tcl | ||
| +++ tools/cvs2fossil/lib/c2f_prev.tcl | ||
| @@ -284,11 +284,12 @@ | ||
| 284 | 284 | # update the in-memory index. We can simply (re)add the items |
| 285 | 285 | # because we cleared the previously existing information, see |
| 286 | 286 | # (*) above. Persistence does not matter here, none of the |
| 287 | 287 | # changesets has been saved to the persistent state yet. |
| 288 | 288 | |
| 289 | - set myitems [lrange $myitems 0 $firste] | |
| 289 | + set myitems [lrange $myitems 0 $firste] | |
| 290 | + set mytitems [lrange $mytitems 0 $firste] | |
| 290 | 291 | foreach iid $myitems { |
| 291 | 292 | set key [list $mytype $iid] |
| 292 | 293 | set myitemmap($key) $self |
| 293 | 294 | log write 8 csets {MAP+ item <$key> $self = [$self str]} |
| 294 | 295 | } |
| 295 | 296 |
| --- tools/cvs2fossil/lib/c2f_prev.tcl | |
| +++ tools/cvs2fossil/lib/c2f_prev.tcl | |
| @@ -284,11 +284,12 @@ | |
| 284 | # update the in-memory index. We can simply (re)add the items |
| 285 | # because we cleared the previously existing information, see |
| 286 | # (*) above. Persistence does not matter here, none of the |
| 287 | # changesets has been saved to the persistent state yet. |
| 288 | |
| 289 | set myitems [lrange $myitems 0 $firste] |
| 290 | foreach iid $myitems { |
| 291 | set key [list $mytype $iid] |
| 292 | set myitemmap($key) $self |
| 293 | log write 8 csets {MAP+ item <$key> $self = [$self str]} |
| 294 | } |
| 295 |
| --- tools/cvs2fossil/lib/c2f_prev.tcl | |
| +++ tools/cvs2fossil/lib/c2f_prev.tcl | |
| @@ -284,11 +284,12 @@ | |
| 284 | # update the in-memory index. We can simply (re)add the items |
| 285 | # because we cleared the previously existing information, see |
| 286 | # (*) above. Persistence does not matter here, none of the |
| 287 | # changesets has been saved to the persistent state yet. |
| 288 | |
| 289 | set myitems [lrange $myitems 0 $firste] |
| 290 | set mytitems [lrange $mytitems 0 $firste] |
| 291 | foreach iid $myitems { |
| 292 | set key [list $mytype $iid] |
| 293 | set myitemmap($key) $self |
| 294 | log write 8 csets {MAP+ item <$key> $self = [$self str]} |
| 295 | } |
| 296 |