From a38c6eee1ab2f62cfebccf6b4b7ec35a1300de16 Mon Sep 17 00:00:00 2001 From: Tom Willemsen Date: Wed, 17 Oct 2012 09:04:32 +0200 Subject: [PATCH] .emacs.d/site-lisp/oni.el --- .emacs.d/site-lisp/oni.el | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/.emacs.d/site-lisp/oni.el b/.emacs.d/site-lisp/oni.el index a480282..2f60c63 100644 --- a/.emacs.d/site-lisp/oni.el +++ b/.emacs.d/site-lisp/oni.el @@ -406,6 +406,14 @@ When dealing with braces, add another line and indent that too." fill-column 72) (fci-mode)) +(defun oni:raise-ansi-term (arg) + "Create or show an `ansi-term' buffer." + (interactive "P") + (let ((buffer (get-buffer "*ansi-term*"))) + (if (and buffer (not arg)) + (switch-to-buffer buffer) + (call-interactively 'ansi-term)))) + (defun oni:raise-eshell () "Start or switch back to `eshell'. Also change directories to current working directory."