emacs run multiple eshell buffers (more then one eshell)

标签：style   blog   class   code   get   int   

(defun buffer-exists (bufname)   
  (not (eq nil (get-buffer bufname))))

(defun make-shell (name)
  "Create a shell buffer named NAME."
  (interactive "sName: ")
  (if (buffer-exists "*eshell*")
      (setq eshell-buffer-name name)
    (message "eshell doesnot exists, use the default name: *eshell*"))
  (eshell))

Because the eshell buffer is determined by the value of eshell-buffer-name.  You need not to rename the buffer after creating it.

emacs run multiple eshell buffers (more then one eshell),布布扣,bubuko.com

emacs run multiple eshell buffers (more then one eshell)

标签：style   blog   class   code   get   int   

原文地址：http://blog.csdn.net/loveaborn/article/details/25101499