X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Fpage-label.ly;fp=Documentation%2Fsnippets%2Fpage-label.ly;h=35533e7259c808adf30159c6eb1294fac0c6e102;hb=e90f0536f9be39ada0bef0aeb0d275dec3b2fb5b;hp=0000000000000000000000000000000000000000;hpb=a8c9e8a7ca320ab0df5fd32e717fd62cd7635ce6;p=lilypond.git

diff --git a/Documentation/snippets/page-label.ly b/Documentation/snippets/page-label.ly
new file mode 100644
index 0000000000..35533e7259
--- /dev/null
+++ b/Documentation/snippets/page-label.ly
@@ -0,0 +1,63 @@
+%% DO NOT EDIT this file manually; it is automatically
+%% generated from LSR http://lsr.dsi.unimi.it
+%% Make any changes in LSR itself, or in Documentation/snippets/new/ ,
+%% and then run scripts/auxiliar/makelsr.py
+%%
+%% This file is in the public domain.
+\version "2.14.0"
+
+\header {
+  lsrtags = "spacing"
+
+  texidoc = "
+Page labels may be placed inside music or at top-level, 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?)
+  (interpret-markup layout props
+   (markup #:fill-line (text #:page-ref label "8" "?"))))
+
+\book {
+  \markup \huge \fill-line { \null Title Page \null }
+
+  \pageBreak
+
+  \label #'toc
+  \markup \column {
+    \large \fill-line { \null Table of contents \null }
+    \toc-line #'toc "Table of contents"
+    \toc-line #'firstScore "First Score"
+    \toc-line #'markA "Mark A"
+    \toc-line #'markB "Mark B"
+    \toc-line #'markC "Mark C"
+    \toc-line #'unknown "Unknown label"
+  }
+
+  \pageBreak
+
+  \label #'firstScore
+  \score {
+    \new Staff \relative c' {
+      c2 c
+      \mark \markup {
+        A (page \concat { \page-ref #'markA "0" "?" ) }
+      } \label #'markA
+      c2 c
+      \pageBreak
+      \mark "B" \label #'markB
+      d2 d
+      d2 d
+      \once \override Score.RehearsalMark #'break-visibility =
+        #begin-of-line-invisible
+      \mark "C" \label #'markC
+    }
+    \header { piece = "First score" }
+  }
+}