summaryrefslogtreecommitdiff
path: root/lisp/progmodes/inf-lisp.el
diff options
context:
space:
mode:
authorChong Yidong <cyd@stupidchicken.com>2011-09-22 12:15:52 -0400
committerChong Yidong <cyd@stupidchicken.com>2011-09-22 12:15:52 -0400
commit72258fe58401a16ab2ff671601c6d6068eb8b799 (patch)
treeebeff5690f1240a024e02ad42c7bb6fea1001570 /lisp/progmodes/inf-lisp.el
parent8f0985161467a7018ba08ccf7c9f37cc7fc3edfe (diff)
downloademacs-72258fe58401a16ab2ff671601c6d6068eb8b799.tar.gz
Reintroduce pop-to-buffer-same-window; use it for previous users of same-window-*.
* window.el (pop-to-buffer-same-window): New (reinstated) fun. * cmuscheme.el (run-scheme, switch-to-scheme): * cus-edit.el (customize-group, custom-buffer-create) (customize-browse): * info.el (info): * shell.el (shell): * mail/sendmail.el (mail): * progmodes/inf-lisp.el (inferior-lisp): Use it. Fixes: debbugs:9532
Diffstat (limited to 'lisp/progmodes/inf-lisp.el')
-rw-r--r--lisp/progmodes/inf-lisp.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/inf-lisp.el b/lisp/progmodes/inf-lisp.el
index 0765f74a1cf..636766b36e7 100644
--- a/lisp/progmodes/inf-lisp.el
+++ b/lisp/progmodes/inf-lisp.el
@@ -297,7 +297,7 @@ of `inferior-lisp-program'). Runs the hooks from
"inferior-lisp" (car cmdlist) nil (cdr cmdlist)))
(inferior-lisp-mode)))
(setq inferior-lisp-buffer "*inferior-lisp*")
- (switch-to-buffer "*inferior-lisp*"))
+ (pop-to-buffer-same-window "*inferior-lisp*"))
;;;###autoload
(defalias 'run-lisp 'inferior-lisp)