[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/denote 6339df8b82 2/3: Merge pull request #158 from ada
From: |
ELPA Syncer |
Subject: |
[elpa] externals/denote 6339df8b82 2/3: Merge pull request #158 from adamruzicka/seq-filter |
Date: |
Mon, 17 Jul 2023 06:58:01 -0400 (EDT) |
branch: externals/denote
commit 6339df8b82d64cdbbeb6f9944cf8e98544352e87
Merge: f0b9604099 363b1c0080
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: GitHub <noreply@github.com>
Merge pull request #158 from adamruzicka/seq-filter
Replace seq-keep with version-agnostic variant
---
denote.el | 15 ++++++++-------
1 file changed, 8 insertions(+), 7 deletions(-)
diff --git a/denote.el b/denote.el
index 908840f834..e37eed8f87 100644
--- a/denote.el
+++ b/denote.el
@@ -1620,13 +1620,14 @@ where the former does not read dates without a time
component."
(defun denote--buffer-file-names ()
"Return file names of Denote buffers."
- (seq-keep
- (lambda (buffer)
- (when-let (((buffer-live-p buffer))
- (file (buffer-file-name buffer))
- ((denote-file-is-note-p file)))
- file))
- (buffer-list)))
+ (delq nil
+ (mapcar
+ (lambda (buffer)
+ (when-let (((buffer-live-p buffer))
+ (file (buffer-file-name buffer))
+ ((denote-file-is-note-p file)))
+ file))
+ (buffer-list))))
;; In normal usage, this should only be relevant for `denote-date',
;; otherwise the identifier is always unique (we trust that no-one