Show More
@@ -2471,11 +2471,12 b' proc selectline {l isnew} {' | |||
|
2471 | 2471 | $ctext mark set fmark.0 0.0 |
|
2472 | 2472 | $ctext mark gravity fmark.0 left |
|
2473 | 2473 | set info $commitinfo($id) |
|
2474 |
$ctext insert end " |
|
|
2474 | $ctext insert end "Changeset: [lindex $info 6]\n" | |
|
2475 | 2475 | if {[llength [lindex $info 7]] > 0} { |
|
2476 | 2476 | $ctext insert end "Branch: [lindex $info 7]\n" |
|
2477 | 2477 | } |
|
2478 |
$ctext insert end " |
|
|
2478 | $ctext insert end "User: [lindex $info 1]\n" | |
|
2479 | $ctext insert end "Date: [lindex $info 2]\n" | |
|
2479 | 2480 | if {[info exists idbookmarks($id)]} { |
|
2480 | 2481 | $ctext insert end "Bookmarks:" |
|
2481 | 2482 | foreach bookmark $idbookmarks($id) { |
@@ -3600,7 +3601,7 b' proc lineclick {x y id isnew} {' | |||
|
3600 | 3601 | $ctext tag bind link0 <1> [list selbyid $id] |
|
3601 | 3602 | set info $commitinfo($id) |
|
3602 | 3603 | $ctext insert end "\n\t[lindex $info 0]\n" |
|
3603 |
$ctext insert end "\t |
|
|
3604 | $ctext insert end "\tUser:\t[lindex $info 1]\n" | |
|
3604 | 3605 | $ctext insert end "\tDate:\t[lindex $info 2]\n" |
|
3605 | 3606 | if {[info exists children($id)]} { |
|
3606 | 3607 | $ctext insert end "\nChildren:" |
@@ -3612,7 +3613,7 b' proc lineclick {x y id isnew} {' | |||
|
3612 | 3613 | $ctext insert end $child [list link link$i] |
|
3613 | 3614 | $ctext tag bind link$i <1> [list selbyid $child] |
|
3614 | 3615 | $ctext insert end "\n\t[lindex $info 0]" |
|
3615 |
$ctext insert end "\n\t |
|
|
3616 | $ctext insert end "\n\tUser:\t[lindex $info 1]" | |
|
3616 | 3617 | $ctext insert end "\n\tDate:\t[lindex $info 2]\n" |
|
3617 | 3618 | } |
|
3618 | 3619 | } |
General Comments 0
You need to be logged in to leave comments.
Login now