procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* test/automated/eshell.el (with-temp-eshell): Use a temp directory

Browse source 
for eshell-directory-name.

It seems we don't have permission to write to HOME on hydra.
This commit is contained in:
Glenn Morris 2013-09-12 20:55:56 -07:00
parent e3066edb0a
commit 9dc7e8e1a4
2 changed files with 10 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
test/ChangeLog
View file

@ -1,3 +1,8 @@
2013-09-13 Glenn Morris <rgm@gnu.org>
* automated/eshell.el (with-temp-eshell):
Use a temp directory for eshell-directory-name.
2013-09-12 Glenn Morris <rgm@gnu.org>
* automated/eshell.el (with-temp-eshell): Avoid hangs in batch mode

7
test/automated/eshell.el
View file

@ -30,12 +30,15 @@
(defmacro with-temp-eshell (&rest body)
"Evaluate BODY in a temporary Eshell buffer."
`(let ((eshell-buffer (eshell t)))
`(let* ((eshell-directory-name (make-temp-file "eshell" t))
(eshell-history-file-name nil)
(eshell-buffer (eshell t)))
(unwind-protect
(with-current-buffer eshell-buffer
,@body)
(let (kill-buffer-query-functions)
(kill-buffer eshell-buffer)))))
(kill-buffer eshell-buffer)
(delete-directory eshell-directory-name t)))))
(defun eshell-insert-command (text &optional func)
"Insert a command at the end of the buffer."