Relace a `mapcan' with an "apply (n-conc (mapcar ....... ))".

diff --git a/lisp/progmodes/cc-langs.el b/lisp/progmodes/cc-langs.el
index de2dab7ebc008d1e65179104fcda684156bf831b..3c1df93e0f9e79f3cdedf7585daa002e64d989ea 100644 (file)
--- a/lisp/progmodes/cc-langs.el
+++ b/lisp/progmodes/cc-langs.el
@@ -2580,15 +2580,17 @@ is in effect or not."
          (when (boundp (c-mode-symbol "font-lock-extra-types"))
            (c-mode-var "font-lock-extra-types")))
         (regexp-strings
-         (mapcan (lambda (re)
+         (apply 'nconc
+                (mapcar (lambda (re)
                    (when (string-match "[][.*+?^$\\]" re)
                      (list re)))
-                 extra-types))
+                 extra-types)))
         (plain-strings
-         (mapcan (lambda (re)
+         (apply 'nconc
+                (mapcar (lambda (re)
                    (unless (string-match "[][.*+?^$\\]" re)
                      (list re)))
-                 extra-types)))
+                 extra-types))))
     (concat "\\<\\("
            (c-concat-separated
             (append (list (c-make-keywords-re nil