branch: externals/org
commit df1f9be7f8553757350385fae5174c91d5194bcd
Author: Ihor Radchenko <yanta...@posteo.net>
Commit: Ihor Radchenko <yanta...@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