[elpa] externals/dtache 561f67d075 121/158: Make remove entry delete session log

[ELPA Syncer]

branch: externals/dtache
commit 561f67d075eb21de41a869f78e88bc015a3402fa
Author: Niklas Eklund <niklas.ekl...@zenseact.com>
Commit: Niklas Eklund <niklas.ekl...@zenseact.com>

    Make remove entry delete session log
---
 dtache.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/dtache.el b/dtache.el
index 0d63aa3901..35eb7c6a1e 100644
--- a/dtache.el
+++ b/dtache.el
@@ -954,7 +954,10 @@ Optionally make the path LOCAL to host."
   (dtache--db-update-sessions))
 
 (defun dtache--db-remove-entry (session)
-  "Remove SESSION from `dtache--sessions' and update database."
+  "Remove SESSION from `dtache--sessions', delete log and update database."
+  (let ((log (dtache--session-file session 'log)))
+    (when (file-exists-p log)
+      (delete-file log)))
   (setq dtache--sessions
         (assq-delete-all (dtache--session-id session) dtache--sessions ))
   (dtache--db-update-sessions))