test

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

diff --git a/input/scarlatti-paper.ly b/input/scarlatti-paper.ly
index 8627c7b475354736d94506f32f1dfa39045a4d4c..79b9ec30348eaf11b77fba372245822a2b05634c 100644 (file)
--- a/input/scarlatti-paper.ly
+++ b/input/scarlatti-paper.ly
@@ -1,31 +1,25 @@
+\version "1.5.68"
 
 \paper{
-       %my standard paper block
+       indent=0.
+       linewidth=188.\mm
 
-       % 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 \override #'forced-distance = #8.4
        }
        \translator{\StaffContext
                TimeSignature \override #'style = #'C
        }
-       \translator{\VoiceContext
+       \translator {
+         \ScoreContext
+         SpacingSpanner \override #'spacing-increment = #1.4
+       }
+       \translator{
+               \VoiceContext
                noStemExtend = ##t
                tupletVisibility = ##f
+               Stem \override #'stem-shorten = #'(0.0)
        }
 }