changeset 12866:4ce524de750f

(run-scheme): Use pop-to-buffer.
author Richard M. Stallman <rms@gnu.org>
date Wed, 16 Aug 1995 14:39:12 +0000
parents aa38412bf76e
children 26e4b5392530
files lisp/xscheme.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/xscheme.el	Wed Aug 16 14:20:19 1995 +0000
+++ b/lisp/xscheme.el	Wed Aug 16 14:39:12 1995 +0000
@@ -89,7 +89,7 @@
 	       (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."