Fossil SCM
Activated invokation of the fossil command importing a revision.
Commit
41c9b799282596428a1cd142fe2398f3ea887b9f
Parent
b7a93530efef9a5…
1 file changed
+1
-2
| --- tools/cvs2fossil/lib/c2f_fossil.tcl | ||
| +++ tools/cvs2fossil/lib/c2f_fossil.tcl | ||
| @@ -113,12 +113,11 @@ | ||
| 113 | 113 | lappend cmd -f $frid $fpath |
| 114 | 114 | log write 2 fossil {** <[format %5d $frid]> = <$flabel>} |
| 115 | 115 | } |
| 116 | 116 | |
| 117 | 117 | # run fossil test-command performing the import. |
| 118 | - # set uuid [eval $cmd] | |
| 119 | - set uuid $label ; # FAKE an uuid for the moment | |
| 118 | + set uuid [eval $cmd] | |
| 120 | 119 | |
| 121 | 120 | log write 2 fossil {== $uuid} |
| 122 | 121 | return $uuid |
| 123 | 122 | } |
| 124 | 123 | |
| 125 | 124 |
| --- tools/cvs2fossil/lib/c2f_fossil.tcl | |
| +++ tools/cvs2fossil/lib/c2f_fossil.tcl | |
| @@ -113,12 +113,11 @@ | |
| 113 | lappend cmd -f $frid $fpath |
| 114 | log write 2 fossil {** <[format %5d $frid]> = <$flabel>} |
| 115 | } |
| 116 | |
| 117 | # run fossil test-command performing the import. |
| 118 | # set uuid [eval $cmd] |
| 119 | set uuid $label ; # FAKE an uuid for the moment |
| 120 | |
| 121 | log write 2 fossil {== $uuid} |
| 122 | return $uuid |
| 123 | } |
| 124 | |
| 125 |
| --- tools/cvs2fossil/lib/c2f_fossil.tcl | |
| +++ tools/cvs2fossil/lib/c2f_fossil.tcl | |
| @@ -113,12 +113,11 @@ | |
| 113 | lappend cmd -f $frid $fpath |
| 114 | log write 2 fossil {** <[format %5d $frid]> = <$flabel>} |
| 115 | } |
| 116 | |
| 117 | # run fossil test-command performing the import. |
| 118 | set uuid [eval $cmd] |
| 119 | |
| 120 | log write 2 fossil {== $uuid} |
| 121 | return $uuid |
| 122 | } |
| 123 | |
| 124 |