Avoid errors with recentering in 'skeleton-insert'

* lisp/skeleton.el (skeleton-insert): Don't recenter if we are
running in a buffer other than the one displayed in the selected
window.  (Bug#31950)

diff --git a/lisp/skeleton.el b/lisp/skeleton.el
index 90e3819cb7fd9954e17279202295671d35bf48f4..e3cebba916498d8bd37905c027e3d577121f8c5a 100644 (file)
--- a/lisp/skeleton.el
+++ b/lisp/skeleton.el
@@ -268,7 +268,8 @@ available:
        (or (eolp) (not skeleton-end-newline) (newline-and-indent))
        (run-hooks 'skeleton-end-hook)
        (sit-for 0)
-       (or (pos-visible-in-window-p beg)
+       (or (not (eq (window-buffer) (current-buffer)))
+            (pos-visible-in-window-p beg)
            (progn
              (goto-char beg)
              (recenter 0)))