summaryrefslogtreecommitdiff
path: root/lisp/ielm.el
diff options
context:
space:
mode:
authorChong Yidong <cyd@stupidchicken.com>2011-09-11 14:30:07 -0400
committerChong Yidong <cyd@stupidchicken.com>2011-09-11 14:30:07 -0400
commit37ac18a341f604b6ebf27af8effc7ef73e2a28ea (patch)
tree2d66b3afb31deff84e67950478a56a81101f59fd /lisp/ielm.el
parentd562d7a44cf4abe2ea23ee6fc2982a1e41bc27fb (diff)
downloademacs-37ac18a341f604b6ebf27af8effc7ef73e2a28ea.tar.gz
Change modes that used same-window-* vars to use switch-to-buffer.
* cmuscheme.el (run-scheme, switch-to-scheme): * ielm.el (ielm): * shell.el (shell): * net/rlogin.el (rlogin): * net/telnet.el (telnet, rsh): * progmodes/inf-lisp.el (inferior-lisp): Use switch-to-buffer. * cus-edit.el (customize-group, custom-buffer-create) (customize-browse, custom-buffer-create-other-window): Use switch-to-buffer or switch-to-buffer-other-window. * info.el (info, Info-find-node, Info-revert-find-node, Info-next) (Info-prev, Info-up, Info-speedbar-goto-node) (info-display-manual): Use switch-to-buffer. (Info-speedbar-goto-node): Use switch-to-buffer-other-frame. * lisp/gnus/message.el (message-pop-to-buffer): Default to switch-to-buffer. (message-mail-other-window, message-mail-other-frame) (message-news-other-window, message-news-other-frame): Use switch-to-buffer-other-frame and switch-to-buffer-other-window instead of setting buffer display varibles. * mail/sendmail.el (mail): Use switch-to-buffer. (mail-recover): Use switch-to-buffer-other-window. * progmodes/gdb-mi.el (gdb-restore-windows, gdb-setup-windows): Use switch-to-buffer.
Diffstat (limited to 'lisp/ielm.el')
-rw-r--r--lisp/ielm.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/ielm.el b/lisp/ielm.el
index 3322e7e55c2..94bb299eaac 100644
--- a/lisp/ielm.el
+++ b/lisp/ielm.el
@@ -563,7 +563,7 @@ Switches to the buffer `*ielm*', or creates it if it does not exist."
(with-current-buffer (get-buffer-create "*ielm*")
(unless (zerop (buffer-size)) (setq old-point (point)))
(inferior-emacs-lisp-mode)))
- (pop-to-buffer "*ielm*")
+ (switch-to-buffer "*ielm*")
(when old-point (push-mark old-point))))
(provide 'ielm)