Browse Source

emacs.el: my-term: Call with prefix argument to create new buffer

pull/5/head
10sr 9 years ago
parent
commit
2685e9ad83
1 changed files with 5 additions and 3 deletions
  1. +5
    -3
      emacs.el

+ 5
- 3
emacs.el View File

@@ -2272,9 +2272,11 @@ This function accept no argument and return newly created buffer of terminal.")


(defun my-term (&optional arg) (defun my-term (&optional arg)
"Open terminal buffer and return that buffer. "Open terminal buffer and return that buffer.
ARG is ignored."

If ARG is given or called with prefix argument, create new buffer."
(interactive "P") (interactive "P")
(if (and my-term
(if (and (not arg)
my-term
(buffer-name my-term)) (buffer-name my-term))
(pop-to-buffer my-term) (pop-to-buffer my-term)
(setq my-term (setq my-term
@@ -2292,7 +2294,7 @@ ARG is ignored."
;; (multi-term) ;; (multi-term)
;; (ansi-term shell-file-name))))) ;; (ansi-term shell-file-name)))))


(setq my-term-function 'eshell)
(setq my-term-function (lambda () (eshell t)))
;;(define-key my-prefix-map (kbd "C-s") 'my-term) ;;(define-key my-prefix-map (kbd "C-s") 'my-term)
(define-key ctl-x-map "i" 'my-term) (define-key ctl-x-map "i" 'my-term)




Loading…
Cancel
Save