diff options
| -rw-r--r-- | thogai.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/thogai.el b/thogai.el index fbbc2f5..1d32dcd 100644 --- a/thogai.el +++ b/thogai.el @@ -649,7 +649,11 @@ BYTES is a list of 6 bytes in the Gemini protocol." ;; someone messed up the point. (goto-char (point-max)) (insert stroke) - (insert "\n")) + (insert "\n") + ;; Scroll to the end of windows showing the paper + ;; tape buffer. + (dolist (window (get-buffer-window-list (process-buffer process) nil t)) + (set-window-point window (point-max)))) ;; Insert into stroke ring, and process translation. (ring-insert thogai-stroke-ring stroke) (thogai-process-stroke thogai-stroke-ring)) |