From f0e30fe8382ef1f6697d69fff214ee7f08bd4043 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 16 Aug 1995 14:39:12 +0000 Subject: [PATCH] (run-scheme): Use pop-to-buffer. --- lisp/xscheme.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/xscheme.el b/lisp/xscheme.el index c09f53a89e2..bb017f0c33f 100644 --- a/lisp/xscheme.el +++ b/lisp/xscheme.el @@ -89,7 +89,7 @@ With argument, asks for a command line." (read-string "Run Scheme: " default) default)))) (setq xscheme-process-command-line command-line) - (switch-to-buffer (xscheme-start-process command-line))) + (pop-to-buffer (xscheme-start-process command-line))) (defun reset-scheme () "Reset the Scheme process." -- 2.39.2