diff --git a/gitk b/gitk
index 97d1be092a..8699e1bb4f 100755
--- a/gitk
+++ b/gitk
@@ -853,7 +853,7 @@ proc make_disporder {start end} {
 		lappend displayorder $id
 		lappend parentlist $parents($curview,$id)
 	    }
-	} elseif {[lindex $displayorder $r] eq {}} {
+	} elseif {[lindex $displayorder [expr {$r + $al - 1}]] eq {}} {
 	    set i $r
 	    foreach id $varccommits($curview,$a) {
 		lset displayorder $i $id