release: 1.3.142

[lilypond.git] / input / scarlatti-paper.ly

diff --git a/input/scarlatti-paper.ly b/input/scarlatti-paper.ly
index 8627c7b475354736d94506f32f1dfa39045a4d4c..7836ecff3de6180aad5d616278c91705ff642491 100644 (file)
--- a/input/scarlatti-paper.ly
+++ b/input/scarlatti-paper.ly
@@ -2,30 +2,30 @@
 \paper{
        %my standard paper block
 
-       % figure out a way to do this cleanly.
 
 %      0=\font "feta19"
 %      -1=\font "feta16"
 %      \stylesheet #(make-style-sheet 'paper19)
 
-       arithmetic_multiplier=7.\pt;
        indent=0.;
        linewidth=188.\mm;
-       forced_stem_shorten0=0.;
-       forced_stem_shorten1=0.;
-       forced_stem_shorten2=0.;
-       forced_stem_shorten3=0.;
+
        \translator{
                \PianoStaffContext
-               maxVerticalAlign=8.4;
-               minVerticalAlign=8.4;
+               VerticalAlignment \set #'forced-distance = #8.4
        }
        \translator{\StaffContext
                TimeSignature \override #'style = #'C
        }
-       \translator{\VoiceContext
+       \translator {
+         \ScoreContext
+         SpacingSpanner \override #'arithmetic-multiplier = #1.4
+       }
+       \translator{
+               \VoiceContext
                noStemExtend = ##t
                tupletVisibility = ##f
+               Stem \override #'stem-shorten = #'(0.0)
        }
 }