diff --git a/editor/editor.lisp b/editor/editor.lisp index be805ff..6671ea7 100644 --- a/editor/editor.lisp +++ b/editor/editor.lisp @@ -158,6 +158,9 @@ serial connection the editor normally runs under.") (write-byte #x1B *eio*) (format *eio* "[1;24r")))) +;; OOPS! The scrolling commands just don't exist on the VT220! +;; TODO: Replace them! + (defun scroll-screen-down (&optional (amount 1)) (write-byte #x1B *eio*) (write-char #\[ *eio*)