Stacken/c64-livecoding
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix weird error with page down

Browse source
This commit is contained in:
John Lorentzson 2025-07-31 22:14:13 +02:00
parent 0e3ebe487c
commit e7867aa4d0
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
editor/editor.lisp
View file

@ -863,8 +863,9 @@ Additionally ensures correct line numbers on the way, as a bonus."
(cond ((or (null (bottom-line view)) (cond ((or (null (bottom-line view))
(eql line (bottom-line view))) (eql line (bottom-line view)))
(feep)) (feep))
((< (view-line-number view (bottom-line view)) ((and (line-in-view (bottom-line view) view)
(height view)) (< (view-line-number view (bottom-line view))
(height view)))
(setf line (bottom-line view)) (setf line (bottom-line view))
(update-buffer-cursor buffer)) (update-buffer-cursor buffer))
(t (t