Differences From:
File
tools/cvs2fossil/lib/c2f_prev.tcl
part of check-in
[3cd599cacd]
- Moved the most complex parts of pushto into their own commands.
by
aku on
2008-01-31 05:39:51.
[view]
To:
File
tools/cvs2fossil/lib/c2f_prev.tcl
part of check-in
[7c43583de1]
- Tinkered with the revision information transfered from a changeset to push, to the fossil accessor code, modified the logging as well.
by
aku on
2008-01-31 06:25:34.
[view]
@@ -430,16 +430,16 @@
proc Getrevisioninfo {revisions} {
set theset ('[join $revisions {','}]')
set revisions {}
- foreach {uuid fname revnr} [state run [subst -nocommands -nobackslashes {
- SELECT U.uuid, F.name, R.rev
+ foreach {frid path fname revnr} [state run [subst -nocommands -nobackslashes {
+ SELECT U.uuid, F.visible, F.name, R.rev
FROM revision R, revuuid U, file F
WHERE R.rid IN $theset -- All specified revisions
AND U.rid = R.rid -- get fossil uuid of revision
AND F.fid = R.fid -- get file of revision
}]] {
- lappend revisions $uuid $fname $revnr
+ lappend revisions $frid $path $fname/$revnr
}
return $revisions
}