summaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2013-09-13 09:16:57 -0700
committerGlenn Morris <rgm@gnu.org>2013-09-13 09:16:57 -0700
commitbc2c0769db73f5acd7545b4c3f74cae29e4e4315 (patch)
treef5f3c2a4b1565b9f2dfcbfda299f737d8c3db3eb /test
parent6ad9cb087a85c5bb0d7010db98dab006f23c4f1d (diff)
downloademacs-bc2c0769db73f5acd7545b4c3f74cae29e4e4315.tar.gz
* test/automated/eshell.el (eshell-test-command-result): Clean up when done
Diffstat (limited to 'test')
-rw-r--r--test/automated/eshell.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/test/automated/eshell.el b/test/automated/eshell.el
index d5ebc567281..f9061ceb57c 100644
--- a/test/automated/eshell.el
+++ b/test/automated/eshell.el
@@ -60,7 +60,9 @@
"Like `eshell-command-result', but not using HOME."
(let ((eshell-directory-name (make-temp-file "eshell" t))
(eshell-history-file-name nil))
- (eshell-command-result command)))
+ (unwind-protect
+ (eshell-command-result command)
+ (delete-directory eshell-directory-name t))))
;;; Tests: