OSDN Git Service
(root)
/
howm
/
howm.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
85441df
)
fix: cleanup temporary summary/contents buffers
author
Hiraoka
<khi@users.osdn.me>
Sat, 10 Dec 2022 11:01:20 +0000
(20:01 +0900)
committer
Hiraoka
<khi@users.osdn.me>
Sat, 10 Dec 2022 11:01:20 +0000
(20:01 +0900)
howm-mode.el
patch
|
blob
|
history
diff --git
a/howm-mode.el
b/howm-mode.el
index
ee511e3
..
56c61bb
100644
(file)
--- 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))
(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))
(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...
(defmacro howm-iigrep-command-for-pattern (&optional fixed-p converter)
;; use macro due to dynamic binding. Sigh...