emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/eev 3be98dea5a 2/2: Fixed some mapconcats.


From: ELPA Syncer
Subject: [elpa] externals/eev 3be98dea5a 2/2: Fixed some mapconcats.
Date: Wed, 28 Feb 2024 09:58:05 -0500 (EST)

branch: externals/eev
commit 3be98dea5a18fca16c1c9b23c866098bed7bc5c6
Author: Eduardo Ochs <eduardoochs@gmail.com>
Commit: Eduardo Ochs <eduardoochs@gmail.com>

    Fixed some mapconcats.
---
 VERSION       | 4 ++--
 eev-elinks.el | 6 ++++--
 eev-tlinks.el | 2 +-
 3 files changed, 7 insertions(+), 5 deletions(-)

diff --git a/VERSION b/VERSION
index bbbb0c0fec..c5798f3d09 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Wed Feb 28 14:02:45 GMT 2024
-Wed Feb 28 11:02:45 -03 2024
+Wed Feb 28 14:12:38 GMT 2024
+Wed Feb 28 11:12:38 -03 2024
diff --git a/eev-elinks.el b/eev-elinks.el
index 8754758a2e..212aab46b6 100644
--- a/eev-elinks.el
+++ b/eev-elinks.el
@@ -352,13 +352,15 @@ This is an internal function used by 
`find-efunction-links' and
   "An internal function used by `find-eloadhistory-links'."
   (mapconcat
    (lambda (fname) (format "%S\n" `(find-fline ,(ee-shorten-elc fname))))
-   (mapcar 'car load-history)))
+   (mapcar 'car load-history)
+   ""))
 
 (defun ee-eloadhistory-fors ()
   "An internal function used by `find-eloadhistory-links'."
   (mapconcat
    (lambda (fname) (format "%S\n" `(find-eloadhistory-for ,fname)))
-   (mapcar 'car load-history)))
+   (mapcar 'car load-history)
+   ""))
 
 (defun ee-shorten-elc (fname)
   "An internal function used by `ee-eloadhistory-find-flines'."
diff --git a/eev-tlinks.el b/eev-tlinks.el
index b35a47dba1..77048d9023 100644
--- a/eev-tlinks.el
+++ b/eev-tlinks.el
@@ -2418,7 +2418,7 @@ http://anggtwu.net/ are newer than the local copy."
   (let* ((dir         "$S/http/anggtwu.net/eev-videos/")
          (url- (concat "http://anggtwu.net/eev-videos/"; stem))
          (f (lambda (ext) (format "wget -N   %s%s\n" url- ext)))
-         (wgets (mapconcat f (split-string exts))))
+         (wgets (mapconcat f (split-string exts) "")))
     (ee-template0 "\
 mkdir -p {dir}
 cd       {dir}



reply via email to

[Prev in Thread] Current Thread [Next in Thread]