summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--bog.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/bog.el b/bog.el
index c5483a6..bc5412b 100644
--- a/bog.el
+++ b/bog.el
@@ -425,7 +425,9 @@ is only active if `bog-use-citekey-cache' is non-nil)."
(dup-cks (sort (bog--find-duplicates (bog-all-heading-citekeys))
#'string-lessp)))
(if (not dup-cks)
- (message "No duplicate citekeys found")
+ (progn (message "No duplicate citekeys found")
+ (and (get-buffer bufname)
+ (kill-buffer bufname)))
(with-current-buffer (get-buffer-create bufname)
(erase-buffer)
(insert (mapconcat #'identity dup-cks "\n"))