From 752c0436b1b6017baedd752a4d676973a6f2ab87 Mon Sep 17 00:00:00 2001
From: Tom Willemsen
Date: Fri, 29 Mar 2013 15:46:50 +0100
Subject: Emacs: speedup calling of ansi-term

---
 emacs/site-lisp/oni.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/emacs/site-lisp/oni.el b/emacs/site-lisp/oni.el
index 9ff1ee4..027463b 100644
--- a/emacs/site-lisp/oni.el
+++ b/emacs/site-lisp/oni.el
@@ -373,7 +373,7 @@ When dealing with braces, add another line and indent that too."
   (let ((buffer (get-buffer "*ansi-term*")))
     (if (and buffer (not arg))
         (switch-to-buffer buffer)
-      (call-interactively 'ansi-term))))
+      (ansi-term (getenv "SHELL")))))
 
 (defun oni:raise-scratch (&optional mode)
   "Show the *scratch* buffer.
-- 
cgit v1.2.3-54-g00ecf