regression tests for auto-first-page-number

diff --git a/input/regression/page-turn-page-breaking-auto-first-page.ly b/input/regression/page-turn-page-breaking-auto-first-page.ly
new file mode 100644 (file)
index 0000000..07eb9e4
--- /dev/null
+++ b/input/regression/page-turn-page-breaking-auto-first-page.ly
@@ -0,0 +1,22 @@
+\version "2.11.20"
+
+\header {
+  texidoc = "By default, we start with page 1, which is on the right hand side
+of a double page. In this example, auto-first-page-number is set to ##t and the
+music won't fit on a single page, so we should automatically set the first page
+number to 2 in order to avoid a bad page turn."
+}
+
+\paper {
+  page-breaking = #ly:page-turn-breaking
+  auto-first-page-number = ##t
+  print-first-page-number = ##t
+}
+
+#(set-default-paper-size "a6")
+
+\book {
+  \score {
+    {\repeat unfold 30 {a b c d}}
+  }
+}
\ No newline at end of file

diff --git a/input/regression/page-turn-page-breaking-auto-first-page2.ly b/input/regression/page-turn-page-breaking-auto-first-page2.ly
new file mode 100644 (file)
index 0000000..710bc54
--- /dev/null
+++ b/input/regression/page-turn-page-breaking-auto-first-page2.ly
@@ -0,0 +1,33 @@
+\version "2.11.20"
+
+\header {
+  texidoc = "By default, we start with page 1, which is on the right hand side
+of a double page. In this example, auto-first-page-number is set to ##t.
+ALthough the music will fit on a single page, it would require stretching the
+first page badly, so we should automatically set the first page
+number to 2 in order to avoid a bad page turn."
+}
+
+\paper {
+  page-breaking = #ly:page-turn-breaking
+  auto-first-page-number = ##t
+  print-first-page-number = ##t
+}
+
+#(set-default-paper-size "a6")
+
+\layout {
+  \context {
+    \Staff
+    \consists "Page_turn_engraver"
+  }
+}
+
+\book {
+  \score {
+    {
+      a b c d R1
+      \repeat unfold 17 {a4 b c d}
+    }
+  }
+}
\ No newline at end of file