branch: elpa/geiser-kawa
commit df35e6b124e9e16c3fdc1b8d24bd3f921cc2ecb7
Author: spellcard199 <spellcard...@protonmail.com>
Commit: spellcard199 <spellcard...@protonmail.com>
Add unwind-protect in geiser-kawa-deps--run-kawa-unadviced
---
elisp/geiser-kawa-deps.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/elisp/geiser-kawa-deps.el b/elisp/geiser-kawa-deps.el
index f37cdce..a22cb0e 100644
--- a/elisp/geiser-kawa-deps.el
+++ b/elisp/geiser-kawa-deps.el
@@ -70,8 +70,9 @@ at REPL startup."
(defun geiser-kawa-deps--run-kawa-unadviced()
"Call `run-kawa' without triggering our advice."
(geiser-kawa-deps--run-kawa--advice-remove)
- (run-kawa)
- (geiser-kawa-deps--run-kawa--advice-add))
+ (unwind-protect
+ (run-kawa)
+ (geiser-kawa-deps--run-kawa--advice-add)))
(defun geiser-kawa-deps--run-kawa--add-compil-hook()
"Run `run-kawa' unadviced the next time a compilation finishes."
