From 1f67da1508b9444ebf79fdc2183f3fb839bb3d3e 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 c483278..2dee8f6 100644 --- a/.emacs.d/site-lisp/oni.el +++ b/.emacs.d/site-lisp/oni.el @@ -409,6 +409,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."