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

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

[elpa] externals/org df1f9be7f8 1/2: fixup! Add testing/lisp/test-duplic


From: ELPA Syncer
Subject: [elpa] externals/org df1f9be7f8 1/2: fixup! Add testing/lisp/test-duplicates-detector.el
Date: Fri, 9 Feb 2024 15:58:23 -0500 (EST)

branch: externals/org
commit df1f9be7f8553757350385fae5174c91d5194bcd
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    fixup! Add testing/lisp/test-duplicates-detector.el
    
    *
    testing/lisp/test-duplicates-detector.el 
(test-duplicates-detector--find-duplicates):
    Provide third argument to `mapconcat' for Emacs <29.
---
 testing/lisp/test-duplicates-detector.el | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/testing/lisp/test-duplicates-detector.el 
b/testing/lisp/test-duplicates-detector.el
index 58da27c07e..349b5297b4 100644
--- a/testing/lisp/test-duplicates-detector.el
+++ b/testing/lisp/test-duplicates-detector.el
@@ -199,15 +199,18 @@ wrap them in `org-test-ignore-duplicate'):
              (lambda (x)
                (concat (make-string (* (setq indent (1+ indent)) 2) ? )
                        x "\n"))
-             string-path)
+             string-path
+              "")
             (mapconcat
              (lambda (x)
                (format "%s%S: %d times\n"
                        (make-string (* indent 2) ? )
                        (car x)
                        (length (cdr x))))
-             (cdr path)))))
-       test-duplicates-detector-duplicate-forms)))
+             (cdr path)
+              ""))))
+       test-duplicates-detector-duplicate-forms
+        "")))
     (when duplicate-tests
       (message "Duplicate ERT tests found:\n%s\n"
               (mapconcat (lambda (x) (format "%S" x))



reply via email to

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