From 20724f1be1517228ca2e570b1b82e42c8a594cf1 Mon Sep 17 00:00:00 2001 From: Hiraoka Date: Sat, 10 Dec 2022 20:01:20 +0900 Subject: [PATCH] fix: cleanup temporary summary/contents buffers --- howm-mode.el | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/howm-mode.el b/howm-mode.el index ee511e3..56c61bb 100644 --- a/howm-mode.el +++ b/howm-mode.el @@ -469,11 +469,16 @@ key binding (defmacro howm-with-iigrep (command-for-pattern show-what action &rest body) (declare (indent 3)) `(let ((*iigrep-post-sentinel* (howm-iigrep-post-sentinel ,action)) + (howm-view-summary-name "*howmS(preview)*") + (howm-view-contents-name "*howmC(preview)*") (howm-history-limit 0) (*howm-show-item-filename* nil) (howm-message-time nil)) - (iigrep-with-grep ,command-for-pattern ,show-what - ,@body))) + (unwind-protect + (iigrep-with-grep ,command-for-pattern ,show-what + ,@body) + (mapc (lambda (b) (and (get-buffer b) (kill-buffer b))) + (list howm-view-summary-name howm-view-contents-name))))) (defmacro howm-iigrep-command-for-pattern (&optional fixed-p converter) ;; use macro due to dynamic binding. Sigh... -- 2.11.0