mirrors/git
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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

Browse Source 
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: Paul Mackerras <paulus@samba.org>
This commit is contained in:
Paul Mackerras
2006-05-20 09:58:49 +10:00
parent b093448910
commit e72ee5ebc8
1 changed files with 1 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
gitk
View File

@ -3429,6 +3429,7 @@ proc selnextpage {dir} {
set lpp 1 set lpp 1
} }
allcanvs yview scroll [expr {$dir * $lpp}] units allcanvs yview scroll [expr {$dir * $lpp}] units
drawvisible
if {![info exists selectedline]} return if {![info exists selectedline]} return
set l [expr {$selectedline + $dir * $lpp}] set l [expr {$selectedline + $dir * $lpp}]
if {$l < 0} { if {$l < 0} {