ryuslash/legacy-dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

.emacs.d/site-lisp/oni.el

Browse source
This commit is contained in:
Tom Willemsen 2012-10-17 09:04:32 +02:00
parent b74622f11b
commit 1f67da1508
1 changed files with 8 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
.emacs.d/site-lisp/oni.el
View file

@ -409,6 +409,14 @@ When dealing with braces, add another line and indent that too."
fill-column 72) fill-column 72)
(fci-mode)) (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 () (defun oni:raise-eshell ()
"Start or switch back to `eshell'. "Start or switch back to `eshell'.
Also change directories to current working directory." Also change directories to current working directory."