自定义shell从.emacs自动启动

Question

我想启动几个shell，并从我的.emacs设置它们的目录。打开它们很容易：

;; run a few shells. 
(shell "*shell5*") 
(shell "*shell6*") 
(shell "*shell7*") 

但我想指定他们的目录。

Answer 1

我

(let ((default-directory "/path/to/whereever/")) 
    (shell "*shell1*")) 

Answer 2

(shell "*shell5*") 
(with-current-buffer "*shell5*" 
(goto-char (point-max)) 
(insert "cd dir")) ;;for example 
(comint-send-input nil t) ;; enter 

现在我有这个，它需要一些改进，我认为。当我在我的emacs中使用它时会导致错误，但是按照你的要求。我会尽力找出原因。