summaryrefslogtreecommitdiff
path: root/lisp/xscheme.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1995-08-16 14:39:12 +0000
committerRichard M. Stallman <rms@gnu.org>1995-08-16 14:39:12 +0000
commitf0e30fe8382ef1f6697d69fff214ee7f08bd4043 (patch)
treef54d446e6f8785211bcf543eeef98e0c6091455c /lisp/xscheme.el
parenta6578b63d2b749400f2fa53b8f6ebec4dc74df75 (diff)
downloademacs-f0e30fe8382ef1f6697d69fff214ee7f08bd4043.tar.gz
(run-scheme): Use pop-to-buffer.
Diffstat (limited to 'lisp/xscheme.el')
-rw-r--r--lisp/xscheme.el2
1 files changed, 1 insertions, 1 deletions
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."