[nongnu] elpa/j-mode 0332b64 22/56: Replacing mapcan with equivalent function which exists by default (credit to @locklin for the new form)

[ELPA Syncer]

branch: elpa/j-mode
commit 0332b64032b3a5fd7142033af21da74a6cd1629f
Author: Zachary Elliott <zach@nyu.edu>
Commit: Zachary Elliott <zach@nyu.edu>

    Replacing mapcan with equivalent function which exists by default (credit 
to @locklin for the new form)
---
 j-font-lock.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/j-font-lock.el b/j-font-lock.el
index f5d88f2..55e550f 100644
--- a/j-font-lock.el
+++ b/j-font-lock.el
@@ -62,12 +62,12 @@
 
  (BUILD-FACES (FACE-NAME FACE-RULES DOCS-STR &optional GROUP) ...)"
   `(eval-when-compile
-     ,@(mapcan (lambda ( x )
-                 (let* ((name (car x))
-                        (body (cdr x)))
-                   `((defvar ,name ',name)
-                     (defface ,name ,@body))))
-               faces)))
+     ,@(apply 'nconc (mapcar (lambda ( x )
+                              (let* ((name (car x))
+                                     (body (cdr x)))
+                                `((defvar ,name ',name)
+                                  (defface ,name ,@body))))
+                            faces))))
 
 (build-faces
  (j-verb-face