Imported Upstream version 2.14.2

[lilypond.git] / input / regression / paper-margins-right-margin.ly

diff --git a/input/regression/paper-margins-right-margin.ly b/input/regression/paper-margins-right-margin.ly
new file mode 100644 (file)
index 0000000..24e3209
--- /dev/null
+++ b/input/regression/paper-margins-right-margin.ly
@@ -0,0 +1,16 @@
+\version "2.14.0"
+
+\header {
+  texidoc = "Here only right-margin is given, left-margin will remain default."
+}
+
+someNotes = \relative c' { \repeat unfold 40 { c4 d e f } }
+
+\paper {
+  #(set-paper-size (ly:get-option 'paper-size))
+  right-margin = 40 \mm
+}
+
+\book {
+  \score { \someNotes }
+}