Fossil SCM
Tweaked human readable representation of changesets to include their type.
Commit
0868adf92a81435d694ede6e70302033ca490762
Parent
9668b164556bbed…
1 file changed
+1
-1
| --- tools/cvs2fossil/lib/c2f_prev.tcl | ||
| +++ tools/cvs2fossil/lib/c2f_prev.tcl | ||
| @@ -50,11 +50,11 @@ | ||
| 50 | 50 | set myidmap($myid) $self |
| 51 | 51 | foreach r $revisions { lappend myrevmap($r) $self } |
| 52 | 52 | return |
| 53 | 53 | } |
| 54 | 54 | |
| 55 | - method str {} { return "<${myid}>" } | |
| 55 | + method str {} { return "<$mytype ${myid}>" } | |
| 56 | 56 | |
| 57 | 57 | method id {} { return $myid } |
| 58 | 58 | method revisions {} { return $myrevisions } |
| 59 | 59 | method data {} { return [list $myproject $mytype $mysrcid] } |
| 60 | 60 | |
| 61 | 61 |
| --- tools/cvs2fossil/lib/c2f_prev.tcl | |
| +++ tools/cvs2fossil/lib/c2f_prev.tcl | |
| @@ -50,11 +50,11 @@ | |
| 50 | set myidmap($myid) $self |
| 51 | foreach r $revisions { lappend myrevmap($r) $self } |
| 52 | return |
| 53 | } |
| 54 | |
| 55 | method str {} { return "<${myid}>" } |
| 56 | |
| 57 | method id {} { return $myid } |
| 58 | method revisions {} { return $myrevisions } |
| 59 | method data {} { return [list $myproject $mytype $mysrcid] } |
| 60 | |
| 61 |
| --- tools/cvs2fossil/lib/c2f_prev.tcl | |
| +++ tools/cvs2fossil/lib/c2f_prev.tcl | |
| @@ -50,11 +50,11 @@ | |
| 50 | set myidmap($myid) $self |
| 51 | foreach r $revisions { lappend myrevmap($r) $self } |
| 52 | return |
| 53 | } |
| 54 | |
| 55 | method str {} { return "<$mytype ${myid}>" } |
| 56 | |
| 57 | method id {} { return $myid } |
| 58 | method revisions {} { return $myrevisions } |
| 59 | method data {} { return [list $myproject $mytype $mysrcid] } |
| 60 | |
| 61 |