Overview
SHA1 Hash: | 61829b076bd6e1bb9b40794206cb1dd5f8eca8ea |
---|---|
Date: | 2007-11-29 07:58:14 |
User: | aku |
Comment: | Renamed changeset method to describe modified results, and updated the one invoker |
Timelines: | ancestors | descendants | both | trunk |
Other Links: | files | ZIP archive | manifest |
Tags And Properties
- branch=trunk inherited from [a28c83647d]
- sym-trunk inherited from [a28c83647d]
Changes
[hide diffs]Modified tools/cvs2fossil/lib/c2f_prev.tcl from [aa2d0f3589] to [f84e4346da].
@@ -71,13 +71,13 @@ } append str "$mytype ${myid}${detail}>" return $str } - method id {} { return $myid } - method revisions {} { return $mytitems } - method data {} { return [list $myproject $mytype $mysrcid] } + method id {} { return $myid } + method items {} { return $mytitems } + method data {} { return [list $myproject $mytype $mysrcid] } delegate method bysymbol to mytypeobj delegate method byrevision to mytypeobj delegate method isbranch to mytypeobj delegate method istag to mytypeobj
Modified tools/cvs2fossil/lib/c2f_prevlink.tcl from [38dafe8989] to [7225a11a38].
@@ -73,15 +73,15 @@ # not break the cycle, only weaken it. array set csetprevmap [Invert [$myprev nextmap]] array set csetnextmap [$mycset nextmap] - set prevrev [$myprev revisions] - set nextrev [$mynext revisions] - - foreach r [$mycset revisions] { - set rt [RT $r] + set prevrev [$myprev items] + set nextrev [$mynext items] + + foreach items [$mycset items] { + set rt [RT $items] incr mycount($rt) lappend mycategory($rt) $r } return }