diff options
author | Arun Isaac | 2022-06-20 12:59:30 +0530 |
---|---|---|
committer | Arun Isaac | 2022-06-20 13:03:30 +0530 |
commit | b8b2e7784b0d409e0ed6a0bbad9ff5e56b0a86cc (patch) | |
tree | 9f4ab9ae6f2bab009da07240f382e3cbacb12070 | |
parent | 2cd30a0fdaf57ed910479df597e147faed1d9127 (diff) | |
download | thogai-b8b2e7784b0d409e0ed6a0bbad9ff5e56b0a86cc.tar.gz thogai-b8b2e7784b0d409e0ed6a0bbad9ff5e56b0a86cc.tar.lz thogai-b8b2e7784b0d409e0ed6a0bbad9ff5e56b0a86cc.zip |
Always append to paper tape buffer.
* thogai.el (thogai-gemini-protocol-filter): ALways append to paper
tape buffer.
-rw-r--r-- | thogai.el | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -645,6 +645,9 @@ BYTES is a list of 6 bytes in the Gemini protocol." (let ((stroke (thogai-gemini-decode-stroke (reverse bytes)))) ;; Log to paper tape. (with-current-buffer (process-buffer process) + ;; Explicitly go to end of buffer, just in case + ;; someone messed up the point. + (goto-char (point-max)) (insert stroke) (insert "\n")) ;; Insert into stroke ring, and process translation. |