[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/denote f247d902f6 2/2: Simplify denote-file-has-support
From: |
ELPA Syncer |
Subject: |
[elpa] externals/denote f247d902f6 2/2: Simplify denote-file-has-supported-extension-p to use 196e68c |
Date: |
Tue, 24 Jan 2023 14:57:39 -0500 (EST) |
branch: externals/denote
commit f247d902f6db5ddd7ecb3addba6cb35df8312232
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>
Simplify denote-file-has-supported-extension-p to use 196e68c
---
denote.el | 11 +++--------
1 file changed, 3 insertions(+), 8 deletions(-)
diff --git a/denote.el b/denote.el
index c0d2822472..555ba875ec 100644
--- a/denote.el
+++ b/denote.el
@@ -592,14 +592,9 @@ Omit FILE if it matches the value of user option
"Return non-nil if FILE has supported extension.
Also account for the possibility of an added .gpg suffix.
Supported extensions are those implied by `denote-file-type'."
- (let* ((extensions (denote--extensions))
- (valid-extensions (append extensions
- (mapcar (lambda (e)
- (concat e ".gpg"))
- extensions))))
- (seq-some
- (lambda (e) (string-suffix-p e file))
- valid-extensions)))
+ (seq-some (lambda (e)
+ (string-suffix-p e file))
+ (denote--extensions-with-encryption)))
(define-obsolete-function-alias
'denote--file-supported-extension-p