X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fbookparts.ly;h=7ee4cf168398d38d3e1f5823ac670c9bc7d626a6;hb=330a2873ed46f66d5abcefda22a633d1137cfb0e;hp=19cd2aa25825728e9ebfe6e445f5ad576cfcc8fd;hpb=edbaa4793402ff05a4d3c2823b0cd36862e591c2;p=lilypond.git

diff --git a/input/regression/bookparts.ly b/input/regression/bookparts.ly
index 19cd2aa258..7ee4cf1683 100644
--- a/input/regression/bookparts.ly
+++ b/input/regression/bookparts.ly
@@ -1,4 +1,4 @@
-\version "2.11.65"
+\version "2.16.0"
 
 \header {
   texidoc = "A book can be split into several parts with different paper settings,
@@ -10,10 +10,6 @@ Page labels are also collected into the top-level paper."
 
 #(set-default-paper-size "a6")
 
-#(define-markup-command (roman-page-number layout props) ()
-  (let ((page-number (chain-assoc-get 'page:page-number props)))
-    (interpret-markup layout props (format #f "~@r" page-number))))
-
 \book {
   \tocItem \markup "First part"
   \header { title = "Book with several parts" }
@@ -25,8 +21,17 @@ Page labels are also collected into the top-level paper."
       left-margin = 20\mm
       right-margin = 20\mm
       line-width = 65\mm
-      evenHeaderMarkup = \markup \fill-line { \roman-page-number "SECOND PART" \null }
-      oddHeaderMarkup = \markup \fill-line { \null "SECOND PART" \roman-page-number }
+      page-number-type = #'roman-upper
+      evenHeaderMarkup = \markup \fill-line {
+        \fromproperty #'page:page-number-string
+        "SECOND PART"
+        \null
+      }
+      oddHeaderMarkup = \markup \fill-line {
+        \null
+        "SECOND PART"
+        \fromproperty #'page:page-number-string
+      }
     }
     \tocItem \markup "Second part"
     \markup \justify { Second part, with different margins and page header. }
@@ -35,5 +40,5 @@ Page labels are also collected into the top-level paper."
 
   \tocItem \markup "Third part"
   \markup { Third part }
-  \markuplines \table-of-contents
+  \markuplist \table-of-contents
 }