X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=input%2Fregression%2Fcluster.ly;h=a05f2ac73d5b575bdb00b8b7d174b1f5e7b2cdc2;hb=fde25b0f9856d77b49571ed0d5ca9c5a5fd4c283;hp=aa16d053965532d8cce73ac3c51cd726ad6d972d;hpb=feb0b96b015c19f2c215326689924acabce0c9a5;p=lilypond.git

diff --git a/input/regression/cluster.ly b/input/regression/cluster.ly
index aa16d05396..a05f2ac73d 100644
--- a/input/regression/cluster.ly
+++ b/input/regression/cluster.ly
@@ -1,22 +1,23 @@
 
-\version "2.3.1"
+\version "2.10.0"
 \header {
-    texidoc = "Clusters are a device to denote that a complete range of
+  texidoc = "Clusters are a device to denote that a complete range of
 notes is to be played."
 }
+  \layout { ragged-right = ##t }
 
-fragment =\notes \relative c' {
-         c4 f4 <e d'>4
-         <g a>8 <e a> a4 c2 <d b>4 e4 
-         c4 }
-
-\score {
- \notes <<
-     \new Staff \fragment
-     \new Staff \applymusic #notes-to-clusters \fragment
-     >>
- \paper { raggedright = ##t }
+
+fragment = \relative c' {
+  c4 f4 <e d'>4
+  <g a>8 <e a> a4 c2 <d b>4 e4 
+  c4
 }
 
+<<
+  \new Staff \fragment
+  \new Staff \makeClusters \fragment
+>>
+
+