* lily/lyric-phrasing-engraver.cc: remove

[lilypond.git] / scm / document-functions.scm

diff --git a/scm/document-functions.scm b/scm/document-functions.scm
index 5b2a64455e6b52561d1f0b341c91be4599baaa97..19b619b365f7c8bb6e4abad078263a2268b56817 100644 (file)
--- a/scm/document-functions.scm
+++ b/scm/document-functions.scm
@@ -2,12 +2,15 @@
  (ice-9 regex)
  )
 
+(define (dashify-underscores str)
+   (regexp-substitute/global #f "_" str 'pre "-" 'post))
+
 (define (format-c-header c-h)
   (regexp-substitute/global
    #f "," 
-   (regexp-substitute/global #f "(SCM|\\)|\\() *" c-h 'pre "" 'post)
-   'pre " " 'post)
-  )
+   (regexp-substitute/global #f "(SCM|\\)|\\() *" (dashify-underscores c-h)
+                            'pre "" 'post)
+   'pre " " 'post))
 
 (define (document-scheme-function name c-header doc-string)
   (string-append
@@ -21,8 +24,7 @@
     (lambda (key val prior)
       (cons (cons key val)  prior)
       )
-    '() (ly:get-all-function-documentation))
-   )
+    '() (ly:get-all-function-documentation)))
 
 (define (all-scheme-functions-doc)
   (let*