gitk: Avoid a crash in selectline if commitinfo($id) isn't set

Occasionally I see a crash in selectline with commitinfo($id) not
set.  This makes sure it is set by calling getcommit $id if it isn't.

Signed-off-by: Paul Mackerras <paulus@samba.org>
This commit is contained in:
Paul Mackerras 2008-03-07 21:19:18 +11:00
Родитель c9cfdc9601
Коммит d76afb15ad
1 изменённых файлов: 4 добавлений и 1 удалений

5
gitk
Просмотреть файл

@ -1218,7 +1218,7 @@ proc chewcommits {} {
if {$viewcomplete($curview)} {
global commitidx varctok
global numcommits startmsecs
global mainheadid commitinfo nullid
global mainheadid nullid
if {[info exists pending_select]} {
set row [first_real_row]
@ -5494,6 +5494,9 @@ proc selectline {l isnew} {
$ctext conf -state normal
clear_ctext
set linknum 0
if {![info exists commitinfo($id)]} {
getcommit $id
}
set info $commitinfo($id)
set date [formatdate [lindex $info 2]]
$ctext insert end "[mc "Author"]: [lindex $info 1] $date\n"