[nongnu] elpa/buttercup 2edeae5 159/340: Rewrite buttercup-suite-full-name with a single loop

[ELPA Syncer]

branch: elpa/buttercup
commit 2edeae50ff435bb2179c1531699d5ea095fc0fba
Author: Ola Nilsson <ola.nilsson@gmail.com>
Commit: Jorgen Schäfer <Jorgen.Schaefer@gmail.com>

    Rewrite buttercup-suite-full-name with a single loop
---
 buttercup.el | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

diff --git a/buttercup.el b/buttercup.el
index 9d43b3d..9193ed3 100644
--- a/buttercup.el
+++ b/buttercup.el
@@ -742,11 +742,9 @@ See also `buttercup-define-matcher'."
 
 (defun buttercup-suite-full-name (suite)
   "Return the full name of SUITE, which includes the names of the parents."
-  (let ((name-parts (mapcar #'buttercup-suite-description
-                            (cons suite (buttercup-suite-parents suite)))))
-    (mapconcat #'identity
-               (reverse name-parts)
-               " ")))
+  (mapconcat #'buttercup-suite-description
+             (nreverse (cons suite (buttercup-suite-parents suite)))
+             " "))
 
 (defun buttercup-spec-full-name (spec)
   "Return the full name of SPEC, which includes the full name of its suite."