Fossil SCM

Bugfix in FilterSym pass. Grafting branches operated on the tags table :(

aku 2007-11-28 08:35 trunk
Commit 8ce7ffff2192b58eef1b2a3fd679af41093531a3
--- tools/cvs2fossil/lib/c2f_pfiltersym.tcl
+++ tools/cvs2fossil/lib/c2f_pfiltersym.tcl
@@ -381,11 +381,11 @@
381381
struct::list assign $fpn($fid) fname prname
382382
383383
# Do the grafting.
384384
385385
log write 4 filtersym {\[[format $fmt $n]/$mxs\] $prname : Grafting tag '$tagname' on $fname/$revnr from '$oldname' onto '$preferedname'}
386
- state run { UPDATE tag SET lod = $pid WHERE tid = $id ; }
386
+ state run { UPDATE tag SET lod = $pid WHERE tid = $id }
387387
incr n
388388
}
389389
390390
log write 3 filtersym "Reparented [nsp $n tag]"
391391
@@ -439,11 +439,11 @@
439439
struct::list assign $fpn($fid) fname prname
440440
441441
# Do the grafting.
442442
443443
log write 4 filtersym {\[[format $fmt $n]/$mxs\] $prname : Grafting branch '$braname' on $fname/$revnr from '$oldname' onto '$preferedname'}
444
- state run { UPDATE tag SET lod = $pid WHERE tid = $id ; }
444
+ state run { UPDATE branch SET lod = $pid WHERE bid = $id }
445445
incr n
446446
}
447447
448448
log write 3 filtersym "Reparented [nsp $n branch branches]"
449449
return
450450
--- tools/cvs2fossil/lib/c2f_pfiltersym.tcl
+++ tools/cvs2fossil/lib/c2f_pfiltersym.tcl
@@ -381,11 +381,11 @@
381 struct::list assign $fpn($fid) fname prname
382
383 # Do the grafting.
384
385 log write 4 filtersym {\[[format $fmt $n]/$mxs\] $prname : Grafting tag '$tagname' on $fname/$revnr from '$oldname' onto '$preferedname'}
386 state run { UPDATE tag SET lod = $pid WHERE tid = $id ; }
387 incr n
388 }
389
390 log write 3 filtersym "Reparented [nsp $n tag]"
391
@@ -439,11 +439,11 @@
439 struct::list assign $fpn($fid) fname prname
440
441 # Do the grafting.
442
443 log write 4 filtersym {\[[format $fmt $n]/$mxs\] $prname : Grafting branch '$braname' on $fname/$revnr from '$oldname' onto '$preferedname'}
444 state run { UPDATE tag SET lod = $pid WHERE tid = $id ; }
445 incr n
446 }
447
448 log write 3 filtersym "Reparented [nsp $n branch branches]"
449 return
450
--- tools/cvs2fossil/lib/c2f_pfiltersym.tcl
+++ tools/cvs2fossil/lib/c2f_pfiltersym.tcl
@@ -381,11 +381,11 @@
381 struct::list assign $fpn($fid) fname prname
382
383 # Do the grafting.
384
385 log write 4 filtersym {\[[format $fmt $n]/$mxs\] $prname : Grafting tag '$tagname' on $fname/$revnr from '$oldname' onto '$preferedname'}
386 state run { UPDATE tag SET lod = $pid WHERE tid = $id }
387 incr n
388 }
389
390 log write 3 filtersym "Reparented [nsp $n tag]"
391
@@ -439,11 +439,11 @@
439 struct::list assign $fpn($fid) fname prname
440
441 # Do the grafting.
442
443 log write 4 filtersym {\[[format $fmt $n]/$mxs\] $prname : Grafting branch '$braname' on $fname/$revnr from '$oldname' onto '$preferedname'}
444 state run { UPDATE branch SET lod = $pid WHERE bid = $id }
445 incr n
446 }
447
448 log write 3 filtersym "Reparented [nsp $n branch branches]"
449 return
450

Keyboard Shortcuts

Open search /
Next entry (timeline) j
Previous entry (timeline) k
Open focused entry Enter
Show this help ?
Toggle theme Top nav button