X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fmusic-functions-init.ly;h=c88759853991c1f7265c931bd3b37bbf49d64dc7;hb=52851991c3a9c6579893bc4ceb97df574dca49c7;hp=ea28ba4a58ccf86fd6995b5d03d6529a9852730b;hpb=4720c6db726f01da800fb1295a2b072ca931efc4;p=lilypond.git

diff --git a/ly/music-functions-init.ly b/ly/music-functions-init.ly
index ea28ba4a58..c887598539 100644
--- a/ly/music-functions-init.ly
+++ b/ly/music-functions-init.ly
@@ -304,9 +304,9 @@ label =
    (_i "Place a bookmarking label, either at top-level or inside music.")
    (make-music 'EventChord
 	       'page-marker #t
-	       'label label
+	       'page-label label
 	       'elements (list (make-music 'LabelEvent
-					   'label label)))) 
+					   'page-label label)))) 
 
 makeClusters =
 #(define-music-function