Merge branch 'master' into new
This commit is contained in:
commit
6d80f3ce78
1
gitk
1
gitk
@ -3657,6 +3657,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} {
|
||||||
|
Loading…
Reference in New Issue
Block a user