]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/chord-changes.ly
The grand \paper -> \layout, \bookpaper -> \paper renaming.
[lilypond.git] / input / regression / chord-changes.ly
index 60258e24075c2913c548506e9fc0eb9ecf5c71d4..122f236d34bacbcfdbc9985259c8c7f8ec54021f 100644 (file)
@@ -1,25 +1,27 @@
+\version "2.3.22"
+
 \header{
-texidoc="property chordChanges: only display chord names 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.
-";
+"
 }
 
-scheme = \chords {
+scheme = \chordmode {
   c1:m \break c:m c:m c:m d
   c1:m \break c:m c:m c:m d
 }
 
 settings = {
-  \property ChordNames.chordChanges = ##t
 }
 
 \score {
-  \notes <
-    \context ChordNames < \scheme \settings >
-    \context Staff \transpose c'' \scheme
-  >
-  \paper{
-    linewidth = 40 * \staffspace;
-  }
+    <<
+       \context ChordNames <<
+           \scheme
+           \set chordChanges = ##t
+       >>
+       \context Staff \transpose c c' \scheme
+    >>
+    \layout{ raggedright = ##t }
 }