[elpa] externals/denote 1b24d2ed5a 04/17: Simplify denote-format-file-name

[ELPA Syncer]

branch: externals/denote
commit 1b24d2ed5a8d6e45a80c5cc891558eebf0fdff81
Author: Jean-Philippe Gagné Guay <jeanphilippe150@gmail.com>
Commit: Jean-Philippe Gagné Guay <jeanphilippe150@gmail.com>

    Simplify denote-format-file-name
---
 denote.el | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/denote.el b/denote.el
index 90cfed9079..f445705c75 100644
--- a/denote.el
+++ b/denote.el
@@ -1493,14 +1493,13 @@ See `denote--retrieve-locations-in-xrefs'."
   "Format file name.
 PATH, ID, KEYWORDS, TITLE-SLUG, EXTENSION and optional SIGNATURE
 are expected to be supplied by `denote' or equivalent command."
-  (let ((kws (denote-keywords-combine keywords))
-        (file-name (concat path id)))
+  (let ((file-name (concat path id)))
     (when (and signature (not (string-empty-p signature)))
       (setq file-name (concat file-name "==" signature)))
     (when (and title-slug (not (string-empty-p title-slug)))
       (setq file-name (concat file-name "--" title-slug)))
-    (when (and keywords (not (string-blank-p kws)))
-      (setq file-name (concat file-name "__" kws)))
+    (when keywords
+      (setq file-name (concat file-name "__" (denote-keywords-combine 
keywords))))
     (concat file-name extension)))
 
 (defun denote--format-front-matter-title (title file-type)