From 71416f00088928014c394a711002af6487f4d0fd Mon Sep 17 00:00:00 2001 From: Bozhidar Batsov Date: Wed, 30 Jan 2013 18:04:51 +0200 Subject: [PATCH] Improve the behaviour of the visit-term command --- core/prelude-core.el | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/core/prelude-core.el b/core/prelude-core.el index d30be09..32df536 100644 --- a/core/prelude-core.el +++ b/core/prelude-core.el @@ -52,8 +52,11 @@ file of a buffer in an external program." (defun prelude-visit-term-buffer () (interactive) (if (not (get-buffer "*ansi-term*")) - (ansi-term (getenv "SHELL")) - (switch-to-buffer "*ansi-term*"))) + (progn + (split-window-sensibly (selected-window)) + (other-window 1) + (ansi-term (getenv "SHELL"))) + (switch-to-buffer-other-window "*ansi-term*"))) (defun prelude-google () "Googles a query or region if any."