Merge branch 'master' into new

This commit is contained in:
Paul Mackerras 2006-05-20 09:59:10 +10:00
commit 6d80f3ce78

1
gitk
View file

@ -3657,6 +3657,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} {