]> git.donarmstrong.com Git - lilypond.git/commitdiff
fix convertly problem. Junk fault lsr import file.
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Fri, 8 Jun 2007 03:21:09 +0000 (00:21 -0300)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Fri, 8 Jun 2007 03:21:09 +0000 (00:21 -0300)
input/lsr/text/creating-text-spanners.ly [deleted file]
python/convertrules.py

diff --git a/input/lsr/text/creating-text-spanners.ly b/input/lsr/text/creating-text-spanners.ly
deleted file mode 100644 (file)
index 26fb939..0000000
+++ /dev/null
@@ -1,42 +0,0 @@
-%%  Do not edit this file; it is auto-generated from LSR!
-\version "2.11.23"
-
-\header { texidoc = "
-The \startTextSpan and \stopTextSpan commands give you the ability to
-create text spanners as easily as pedals indications or octavations.
-Override some properties of the TextSpanner object to modify its
-output.
-" }
-
-\relative c''{
-    \override TextSpanner  #'edge-text = #'("bla" . "blu")
-    a \startTextSpan
-    b c 
-    a \stopTextSpan
-
-    \override TextSpanner  #'dash-period = #2
-    \override TextSpanner  #'dash-fraction = #0.0
-    a \startTextSpan
-    b c 
-    a \stopTextSpan
-
-    \revert TextSpanner #'style
-    \override TextSpanner  #'style = #'dashed-lineNone \override TextSpanner #'bound-details #'left #'text = \markup { \draw-line #'(0 . 1) }
-None \override TextSpanner #'bound-details #'right #'text = \markup { \draw-line #'(0 . -2) }
-
-    a \startTextSpan
-    b c 
-    a \stopTextSpan
-
-
-    \set Staff.middleCPosition = #-13
-
-    \override TextSpanner  #'dash-period = #10
-    \override TextSpanner  #'dash-fraction = #.5
-    \override TextSpanner  #'thickness = #10
-    a \startTextSpan
-    b c 
-    a \stopTextSpan
-    \set Staff.middleCPosition = #-6   
-}
-
index f2d9dbd9ca929527f153ddb4957f35881cdf684a..147813ef195087359bb1112e4c27e3e8f87c4a9e 100644 (file)
@@ -2986,8 +2986,12 @@ def conv (str):
                          ('right', m.group (4))]:
 
             if h and float (h):
+                once = m.group(1)
+                if not once:
+                    once = ''
+                    
                 s += (r"%s \override %s #'bound-details #'%s #'text = \markup { \draw-line #'(0 . %s) }"
-                      % (m.group(1), m.group (2), var, h))
+                      % (once, m.group (2), var, h))
 
                 s += '\n'