[nongnu] elpa/eat 7891cae44b 1/4: Synchronize scrolling and point properly

[ELPA Syncer]

branch: elpa/eat
commit 7891cae44bc2fa25775d83e697d139c2a5eb8e8b
Author: Akib Azmain Turja <akib@disroot.org>
Commit: Akib Azmain Turja <akib@disroot.org>

    Synchronize scrolling and point properly
    
    * eat.el (eat--synchronize-scroll)
    (eat--eshell-synchronize-scroll): Call 'set-window-point' in
    addition to 'goto-char'.
---
 eat.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/eat.el b/eat.el
index 197e507021..5fa15476e0 100644
--- a/eat.el
+++ b/eat.el
@@ -4756,7 +4756,9 @@ MODE should one of:
   "Synchronize scrolling and point between terminal and window."
   (when-let* ((window (get-buffer-window (current-buffer))))
     (set-window-start
-     window (eat-term-display-beginning eat--terminal)))
+     window (eat-term-display-beginning eat--terminal))
+    (set-window-point
+     window (eat-term-display-cursor eat--terminal)))
   (goto-char (eat-term-display-cursor eat--terminal)))
 
 (defun eat--setup-glyphless-chars ()
@@ -5539,7 +5541,9 @@ sane 2>%s ; if [ $1 = .. ]; then shift; fi; exec \"$@\""
            (if (<= start-line 0)
                (eat-term-display-beginning eat--terminal)
              (vertical-motion (- start-line))
-             (point)))))))
+             (point))))))
+    (set-window-point
+     window (eat-term-display-cursor eat--terminal)))
   (goto-char (eat-term-display-cursor eat--terminal)))
 
 (defun eat--eshell-update-cwd ()