X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fchord-changes.ly;h=fcc12f31d180e04d7b1c2441cdc9248eec5dcb2c;hb=6f955cc6d9ed4314f229e780b77b3b7a24d726c2;hp=9f8a3dd626e8a0c2e73ae4ed7ef9bc1edf465fa0;hpb=06b1da466f99f6c4a01ee6a3e611d25bd5359d4c;p=lilypond.git

diff --git a/input/regression/chord-changes.ly b/input/regression/chord-changes.ly
index 9f8a3dd626..fcc12f31d1 100644
--- a/input/regression/chord-changes.ly
+++ b/input/regression/chord-changes.ly
@@ -1,27 +1,28 @@
-\version "2.3.17"
+\version "2.14.0"
 
 \header{
-texidoc="Property chordChanges: display chord names only when
+  texidoc="Property chordChanges: display chord names only when
 there's a change in the chords scheme, but always display the
 chord name after a line break.
 "
 }
 
+\layout{ ragged-right = ##t }
+
+
 scheme = \chordmode {
   c1:m \break c:m c:m c:m d
   c1:m \break c:m c:m c:m d
 }
 
 settings = {
-  \set chordChanges = ##t
 }
 
-\score {
-   <<
-    \context ChordNames << \scheme \settings >>
-    \context Staff \transpose c c' \scheme
+<<
+  \context ChordNames <<
+    \scheme
+    \set chordChanges = ##t
   >>
-  \paper{
-    linewidth = 40 * \staffspace
-  }
-}
+  \context Staff \transpose c c' \scheme
+>>
+