Imported Upstream version 2.18.0

[lilypond.git] / scm / document-type-predicates.scm

diff --git a/scm/document-type-predicates.scm b/scm/document-type-predicates.scm
index e6cff904c3ab95890ff54010d4acbddc369227c4..2e94f2c3f869ed35f13bc53ea102306999fcf6e5 100644 (file)
--- a/scm/document-type-predicates.scm
+++ b/scm/document-type-predicates.scm
@@ -40,9 +40,9 @@
    "\n"
    "@multitable @columnfractions .33 .66\n"
    "@headitem Type predicate @tab Description\n"
-   (apply string-append
-          (sort (map document-type-predicate alist)
-                ly:string-ci<?))
+   (string-concatenate
+    (sort (map document-type-predicate alist)
+          ly:string-ci<?))
    "@end multitable\n"
    "\n"))
 
@@ -56,8 +56,7 @@
    "* LilyPond exported predicates::\n"
    "@end menu\n"
    "\n"
-   (apply
-    string-append
+   (string-concatenate
     (map
      (lambda (alist-nodename-list)
        (apply document-type-predicate-category