Emacs: speedup calling of ansi-term

2013-03-29 15:46:50 +01:00 · 2013-03-29 15:46:50 +01:00 · 752c0436b1
commit 752c0436b1
parent 56822a900c
1 changed files with 1 additions and 1 deletions
--- 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.