Fix some uses of switch-to-buffer.

[bpt/emacs.git] / lisp / autoinsert.el

diff --git a/lisp/autoinsert.el b/lisp/autoinsert.el
index 5793c31..3b849ce 100644 (file)
--- a/lisp/autoinsert.el
+++ b/lisp/autoinsert.el
@@ -360,7 +360,7 @@ Matches the visited file name against the elements of `auto-insert-alist'."
                   (save-window-excursion
                     ;; make buffer visible before skeleton or function
                     ;; which might ask the user for something
-                    (switch-to-buffer (current-buffer))
+                    (pop-to-buffer-same-window (current-buffer))
                     (if (and (consp action)
                              (not (eq (car action) 'lambda)))
                         (skeleton-insert action)