]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/lily-library.scm
\label and \page-ref documentation and news item.
[lilypond.git] / scm / lily-library.scm
index 54355336d89513d4b263c0c5caab657439e4f6ee..6bd66501e4950e911c9ab1204cca99e4712fda9b 100644 (file)
@@ -72,7 +72,7 @@
   (cond ((music-property 'page-marker)
         ;; a page marker: set page break/turn permissions or label
         (begin
-          (let ((label (music-property 'label)))
+          (let ((label (music-property 'page-label)))
             (if (symbol? label)
                 (score-handler (ly:make-page-label-marker label))))
           (for-each (lambda (symbol)