(Emacs/elisp)~cl-reduce -> string-join

2024-06-14 02:38:58 +01:00
parent e546a66da0
commit 3ef303fb67
2 changed files with 5 additions and 8 deletions
--- a/Emacs/.config/emacs/elisp/org-bookmark.el
+++ b/Emacs/.config/emacs/elisp/org-bookmark.el
@@ -60,9 +60,7 @@ urls)."
    (cons
     (format "%s %s" name
             (substring-no-properties
-              (cl-reduce #'(lambda (x y) (concat x ":" y))
-                         tags
-                         :initial-value "")))
+              (string-join tags ":")))
     url)))

 (defvar +bookmark/--cache nil