diff --git a/editor/editor.lisp b/editor/editor.lisp index 27fb7e5..3a47eb8 100644 --- a/editor/editor.lisp +++ b/editor/editor.lisp @@ -863,8 +863,9 @@ Additionally ensures correct line numbers on the way, as a bonus." (cond ((or (null (bottom-line view)) (eql line (bottom-line view))) (feep)) - ((< (view-line-number view (bottom-line view)) - (height view)) + ((and (line-in-view (bottom-line view) view) + (< (view-line-number view (bottom-line view)) + (height view))) (setf line (bottom-line view)) (update-buffer-cursor buffer)) (t