vendor/multi-term.el @@ -56,25 +56,13 @@ 'fullboth))) (global-set-key (kbd "M-n") 'toggle-fullscreen) -;; Create new shells -(global-set-key [f9] 'alt-shell-dwim) -(defun alt-shell-dwim (arg) - "Run an inferior shell like `shell'. If an inferior shell as its I/O -through the current buffer, then pop the next buffer in `buffer-list' -whose name is generated from the string \"*shell*\". When called with -an argument, start a new inferior shell whose I/O will go to a buffer -named after the string \"*shell*\" using `generate-new-buffer-name'." - (interactive "P") - (let* ((shell-buffer-list - (let (blist) - (dolist (buff (buffer-list) blist) - (when (string-match "^\\*shell\\*" (buffer-name buff)) - (setq blist (cons buff blist)))))) - (name (if arg - (generate-new-buffer-name "*shell*") - (car shell-buffer-list)))) - (shell name))) +;; Multi-term +(require 'multi-term) +(multi-term-keystroke-setup) +(setq multi-term-program "/bin/bash") +;; TE for terminal +(global-set-key (kbd "M-e") 'multi-term) ;; Keyboard arun.el 9a42ec393957ab0aed74d8370b0cf36da363e9f7 arunthampi arun.thampi@gmail.com http://github.com/arunthampi/emacs-starter-kit/commit/1616628f07832db75ef10d8540c0f7efe34f3491 1616628f07832db75ef10d8540c0f7efe34f3491 2009-01-04T22:56:05-08:00 2009-01-04T22:56:05-08:00 Add multi-term for distraction-free programming and terminals 4ed0fbcfb726eee3c50d5c0441d90fc79ffa1690 arunthampi arun.thampi@gmail.com