summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorArun Isaac2019-08-27 10:58:41 +0530
committerArun Isaac2019-08-27 10:58:41 +0530
commit05f9fbaa7fb5facd2c4e458f9529c778d0a5e7a5 (patch)
tree2424f837735c2e37054b69613568676e8d5cbc2b
parentd637e3a7cf40598319a7e6b039ee43e8a7725b48 (diff)
downloadennum-05f9fbaa7fb5facd2c4e458f9529c778d0a5e7a5.tar.gz
ennum-05f9fbaa7fb5facd2c4e458f9529c778d0a5e7a5.tar.lz
ennum-05f9fbaa7fb5facd2c4e458f9529c778d0a5e7a5.zip
Fix unwind protection in ennu-with-temporary-directory.
* ennu.el (ennu-with-temporary-directory): Fix unwind protection.
-rw-r--r--ennu.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/ennu.el b/ennu.el
index 412aa55..eb04b4e 100644
--- a/ennu.el
+++ b/ennu.el
@@ -367,7 +367,8 @@ finally delete the temporary directory. The value returned is the
value of the last form in BODY."
(declare (indent defun))
`(let ((,temporary-directory (make-temp-file "ennu" t)))
- (unwind-protect ,@body
+ (unwind-protect
+ (progn ,@body)
(delete-directory ,temporary-directory t))))
(defun ennu-many-to-many-group-by (function sequence)