* lily/note-spacing.cc (get_spacing): less space at EOL in case of

[lilypond.git] / input / mutopia / J.S.Bach / baerenreiter-sarabande.ly

diff --git a/input/mutopia/J.S.Bach/baerenreiter-sarabande.ly b/input/mutopia/J.S.Bach/baerenreiter-sarabande.ly
index 8e8ea651148bd4b9332598aea14f55695bb577a1..b80bb0b9717d2b4114b3a84f8801abb19f667bf1 100644 (file)
--- a/input/mutopia/J.S.Bach/baerenreiter-sarabande.ly
+++ b/input/mutopia/J.S.Bach/baerenreiter-sarabande.ly
@@ -1,4 +1,4 @@
-\version "2.1.23"
+\version "2.1.25"
 
 % #(ly:set-point-and-click 'line-column)
 
@@ -7,9 +7,9 @@ forcedLastBreak = \notes { \break }
 %% We want this to perfectly match the Baerenreiter spacing.
 %% If we're not using 6 systems, there's definately a problem.
 #(define (assert-system-count smob n)
-  (let ((systems (length (ly:get-broken-into
-                         (ly:get-original
-                          (ly:get-system smob))))))
+  (let ((systems (length (ly:spanner-broken-into
+                         (ly:grob-original
+                          (ly:grob-system smob))))))
     (if (not (equal? n systems))
        (error
        ;;(warn