new slur dash patch by Bertalan Fodor.

diff --git a/ChangeLog b/ChangeLog
index ea1591ffea8786c270a1dbf50075d6fea3b0251b..c9ee4e792b0fb93f7999e5c09e587d7bb60bf88d 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2005-02-15  Han-Wen Nienhuys  <hanwen@xs4all.nl>
+
+       * scripts/convert-ly.py: new slur dash patch by Bertalan Fodor.
+
 2005-02-12  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
        * scm/define-grob-properties.scm (all-user-grob-properties):

diff --git a/Documentation/user/notation.itely b/Documentation/user/notation.itely
index 14665f888aca7e13f76f54f3d97fdb0ef143f7aa..e16894bb1fbc9035ebea3bd13e66b94f05e86d2b 100644 (file)
--- a/Documentation/user/notation.itely
+++ b/Documentation/user/notation.itely
@@ -2089,6 +2089,8 @@ be achieved in LilyPond by setting @code{doubleSlurs},
 @code{\slurDown},
 @cindex @code{\slurNeutral}
 @code{\slurNeutral},
+@cindex @code{\slurDashed}
+@code{\slurDashed},
 @cindex @code{\slurDotted}
 @code{\slurDotted},
 @cindex @code{\slurSolid}

diff --git a/THANKS b/THANKS
index ba47639895526ac58c483cd39a5e454498469ef0..bbae33962f379ee69723cf3296e3e7c0ee7a370d 100644 (file)
--- a/THANKS
+++ b/THANKS
@@ -11,6 +11,7 @@ Graham Percival   - Documentation Editor
 
 CONTRIBUTORS
 
+Bertalan Fodor
 Christian Hitz
 Erlend Aasland
 Arno Waschk

diff --git a/ly/property-init.ly b/ly/property-init.ly
index 52d4e7e419051e9371b18227c48a6de67d748b2e..bdc433603da34e6a4a6170a8e727c94b6a9b78c7 100644 (file)
--- a/ly/property-init.ly
+++ b/ly/property-init.ly
@@ -12,11 +12,11 @@ slurNeutral = \revert Slur #'direction
 
 % There's also dash, but setting dash period/length should be fixed.
 slurDashed = {
-       \override Slur #'dash-period = #1
+       \override Slur #'dash-period = #0.75
        \override Slur #'dash-fraction = #0.4
 }
 slurDotted = {
-       \override Slur  #'dash-period = #1
+       \override Slur  #'dash-period = #0.75
        \override Slur #'dash-fraction = #0.1
 }
 slurSolid = {

diff --git a/scripts/convert-ly.py b/scripts/convert-ly.py
index 1f0cea3ad7eeabf70f58de646e6248c766b537ad..ace5a8cae710b3d65084c9bc9f1d3ea7c3b25876 100644 (file)
--- a/scripts/convert-ly.py
+++ b/scripts/convert-ly.py
@@ -2323,6 +2323,15 @@ conversions.append (((2, 5, 2),
                     conv,
                     'ly:find-glyph-by-name -> ly:font-get-glyph, remove - from glyphnames.'))
 
+def conv (str):
+       str = re.sub (r"\\override\s+(Voice\.)?Slur #'dashed\s*=\s*#\d*(\.\d+)?",
+                     r"\\slurDashed", str)                   
+       return str
+
+conversions.append (((2, 5, 12),
+                    conv,
+                    '\set Slur #\'dashed = #X -> \slurDashed'))
+
 
 ################################
 #      END OF CONVERSIONS