* scm/page.scm: Rename annotate{headers,systems,page}->

[lilypond.git] / scm / page.scm

diff --git a/scm/page.scm b/scm/page.scm
index 23ee840792dac46a10f25ecbaffdba355f0f4e5b..a572e441021806a743ea49b8261db1cb6827b6cc 100644 (file)
--- a/scm/page.scm
+++ b/scm/page.scm
@@ -162,7 +162,7 @@
          
          ;; add arrow markers 
          (if (or (annotate? layout)
-                 (ly:output-def-lookup layout 'annotateheaders #f)) 
+                 (ly:output-def-lookup layout 'annotate-headers #f)) 
              (set! head-stencil
                    (ly:stencil-add
                     (ly:stencil-translate-axis
@@ -315,7 +315,7 @@ create offsets.
        )
 
     (if (or (annotate? layout)
-           (ly:output-def-lookup layout 'annotatesystems #f))
+           (ly:output-def-lookup layout 'annotate-systems #f))
 
        (begin
          (for-each (lambda (sys next-sys)
@@ -366,7 +366,7 @@ create offsets.
 
     ;; annotation.
     (if (or (annotate? layout)
-           (ly:output-def-lookup layout 'annotatepage #f))
+           (ly:output-def-lookup layout 'annotate-page #f))
        (set! page-stencil (annotate-page layout page-stencil)))
 
     page-stencil))