gitk: Fix display of "(...)" for parents/children we haven't drawn

diff --git a/gitk b/gitk
index 4aa57c01ce56e505aba5384f716376a68a7fdc7a..d59debf2f5bb8907cd77fb63f70aa59d6e856602 100755 (executable)
--- a/gitk
+++ b/gitk
@@ -3213,8 +3213,11 @@ proc selcanvline {w x y} {
 
 proc commit_descriptor {p} {
     global commitinfo
+    if {![info exists commitinfo($p)]} {
+       getcommit $p
+    }
     set l "..."
-    if {[info exists commitinfo($p)]} {
+    if {[llength $commitinfo($p)] > 1} {
        set l [lindex $commitinfo($p) 0]
     }
     return "$p ($l)"