[elpa] externals/coterm 94980a3 2/2: Restore unhandled fragment in the correct buffer

[ELPA Syncer]

branch: externals/coterm
commit 94980a337d4f5544012999a725a2d06bc915d7aa
Author: Miha Rihtaršič <miha@kamnitnik.top>
Commit: Miha Rihtaršič <miha@kamnitnik.top>

    Restore unhandled fragment in the correct buffer
---
 coterm.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/coterm.el b/coterm.el
index 3b330b7..b6fe4ba 100644
--- a/coterm.el
+++ b/coterm.el
@@ -833,10 +833,6 @@ buffer and the scrolling region must cover the whole 
screen."
       (setq coterm--t-row 0))))
 
 (defun coterm--t-emulate-terminal (proc-filt process string)
-  (when-let ((fragment coterm--t-unhandled-fragment))
-    (setq string (concat fragment string))
-    (setq coterm--t-unhandled-fragment nil))
-
   (let* ((pmark (process-mark process))
          (match 0)
          (will-insert-newlines 0)
@@ -872,6 +868,10 @@ buffer and the scrolling region must cover the whole 
screen."
           (funcall proc-filt process string)
 
         (with-current-buffer buf
+          (when-let ((fragment coterm--t-unhandled-fragment))
+            (setq string (concat fragment string))
+            (setq coterm--t-unhandled-fragment nil))
+
           (setq restore-point (if (= (point) pmark) pmark (point-marker)))
           (setq old-pmark (copy-marker pmark window-point-insertion-type))
           (coterm--t-adjust-from-pmark pmark)