瀏覽代碼

rm frame term func

pull/1/head
10sr 12 年之前
父節點
當前提交
b04a0fc406
共有 1 個檔案被更改,包括 0 行新增14 行删除
  1. +0
    -14
      emacs.el

+ 0
- 14
emacs.el 查看文件

@@ -813,20 +813,6 @@ return nil if LIB unfound and downloading failed, otherwise the path of LIB."
(multi-term)
(ansi-term "/bin/bash"))))

(defvar my-frame-term-plist nil)
;; (setplist my-frame-term-plist nil)
(defun my-execute-or-find-term ()
""
(interactive)
(let* ((buf (plist-get my-frame-term-plist (selected-frame))))
(if (and buf
(buffer-name buf))
(switch-to-buffer buf)
(setq my-frame-term-plist
(plist-put my-frame-term-plist
(selected-frame)
(my-term))))))

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


Loading…
取消
儲存