(oop): use srfi-1 too.

[lilypond.git] / input / ascii-art / standchen-as9.ly

diff --git a/input/ascii-art/standchen-as9.ly b/input/ascii-art/standchen-as9.ly
index a6faa6e28b79f6e953dc22ca4e6e5b38082c36af..5c809c9b72966fa85ce081f31bbdecdb836b6bb3 100644 (file)
--- a/input/ascii-art/standchen-as9.ly
+++ b/input/ascii-art/standchen-as9.ly
@@ -1,4 +1,4 @@
-\version "1.3.146"
+\version "1.7.18"
 % ASCII Art output
 
 % Process as:
@@ -15,7 +15,7 @@
     \context Staff=upper \notes\relative c{
       \key f \major
       \time 3/4
-      r8^"Moderato" %\pp 
+      r8^"Moderato" %-\pp 
       <g'-. c-.> <c-. es-.> <g-. c-.> <c-. es-.> <g-. c-.> |
       r8 <as-. c-.> <c-. es-.>
     }
@@ -34,8 +34,8 @@
       \VoiceContext 
       % horizontal beams
       Beam \override #'height = #0
-      autoBeamSettings \override #'(begin * * * *) = #(make-moment 0 1)
-      textNonEmpty = ##f
+      autoBeamSettings \override #'(begin * * * *) = #(ly:make-moment 0 1)
+      TextScript \set #'no-spacing-rods = ##t
     }
   }
 }