Merge commit 'origin'

[lilypond.git] / input / lsr / page-label.ly

diff --git a/input/lsr/page-label.ly b/input/lsr/page-label.ly
index 8be01b2f87df45bb3c1fa87e23cae7a9a8f51287..f1e6df43f86477829dedb84cbf8e1c3b4c4180c1 100644 (file)
--- a/input/lsr/page-label.ly
+++ b/input/lsr/page-label.ly
@@ -1,27 +1,30 @@
 %% Do not edit this file; it is auto-generated from input/new
-\version "2.11.35"
-\layout { ragged-right= ##t }
+%% This file is in the public domain.
+%% Note: this file works from version 2.12.0
+\version "2.13.1"
 \header {
-  doctitle = "Page label"
   lsrtags = "spacing"
   texidoc = "Page labels may be placed inside music or at top-level,
-and refered to in markups."
-}
-% begin verbatim
+and referred to in markups."
+  doctitle = "Page label"
+} % begin verbatim
+
+
 #(set-default-paper-size "a6")
 
-#(define-markup-command (toc-line layout props label text) (symbol? markup?)
+#(define-markup-command (toc-line layout props label text)
+  (symbol? markup?)
   (interpret-markup layout props
    (markup #:fill-line (text #:page-ref label "8" "?"))))
 
 \book {
-  \markup \huge \fill-line { \null "Title Page" \null }
+  \markup \huge \fill-line { \null Title Page \null }
 
   \pageBreak
 
   \label #'toc
   \markup \column {
-    \large \fill-line { \null "Table of contents" \null }
+    \large \fill-line { \null Table of contents \null }
     \toc-line #'toc "Table of contents"
     \toc-line #'firstScore "First Score"
     \toc-line #'markA "Mark A"
@@ -34,14 +37,18 @@ and refered to in markups."
 
   \label #'firstScore
   \score {
-    { c'2 c'
-      \mark \markup { A (page \concat { \page-ref #'markA "0" "?" ) }} \label #'markA 
-      c' c'
+    \new Staff \relative c' {
+      c2 c
+      \mark \markup {
+        A (page \concat { \page-ref #'markA "0" "?" ) }
+      } \label #'markA
+      c2 c
       \pageBreak
       \mark "B" \label #'markB
-      d' d'
-      d' d'
-      \once \override Score . RehearsalMark #'break-visibility = #begin-of-line-invisible
+      d2 d
+      d2 d
+      \once \override Score.RehearsalMark #'break-visibility =
+        #begin-of-line-invisible
       \mark "C" \label #'markC
     }
     \header { piece = "First score" }