提交 e72ee5eb 编写于 作者: P Paul Mackerras

gitk: Fix bug where page-up/down wouldn't always work properly

If the user pressed page up or page down and the new page wasn't
already drawn, we failed to select the line we wanted in the new
page.  This fixes it.
Signed-off-by: NPaul Mackerras <paulus@samba.org>
上级 b0934489
......@@ -3429,6 +3429,7 @@ proc selnextpage {dir} {
set lpp 1
}
allcanvs yview scroll [expr {$dir * $lpp}] units
drawvisible
if {![info exists selectedline]} return
set l [expr {$selectedline + $dir * $lpp}]
if {$l < 0} {
......
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册