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
commit6dd1f3a7d361314f8979f9ab70525f94a41708c9 (patch)
treed8f188290795c902fec3aefaec7fb41a0a55eff4 /lisp/xscheme.el
parent3496a9e8707ef4502aa67be1197fa46119e9ee89 (diff)
downloademacs-6dd1f3a7d361314f8979f9ab70525f94a41708c9.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."