瀏覽代碼

my-term always use eshell

pull/1/head
10sr 11 年之前
父節點
當前提交
d8f5954e4c
共有 1 個文件被更改,包括 17 次插入6 次删除
  1. +17
    -6
      emacs.el

+ 17
- 6
emacs.el 查看文件

@@ -1737,12 +1737,23 @@ if arg given, use that eshell buffer, otherwise make new eshell buffer."
(pop-to-buffer my-term)
(setq my-term
(save-window-excursion
(if (eq system-type 'windows-nt)
(eshell)
(if (require 'multi-term nil t)
(multi-term)
(ansi-term shell-file-name)))))
(my-term)))
(funcall my-term-function)
))
(and my-term
(my-term))))

(defvar my-term-function nil
"Function to create terminal buffer.")

;; (setq my-term-function
;; (lambda ()
;; (if (eq system-type 'windows-nt)
;; (eshell)
;; (if (require 'multi-term nil t)
;; (multi-term)
;; (ansi-term shell-file-name)))))

(setq my-term-function 'eshell)

(defun my-delete-frame-or-kill-emacs ()
"delete frame when opening multiple frame, kill emacs when only one."


Loading…
取消
儲存