Fix 1390: Add slashedGrace function (graces with slashed stems but no slur, e.g....

[lilypond.git] / ly / grace-init.ly

diff --git a/ly/grace-init.ly b/ly/grace-init.ly
index b9729f3e9360735d3f4a29aa772801a45acb4240..6850541afaeb1c8bb209c42208f0a68b1955ffdd 100644 (file)
--- a/ly/grace-init.ly
+++ b/ly/grace-init.ly
@@ -28,3 +28,11 @@ stopAcciaccaturaMusic =  {
     \revert Stem #'stroke-style
     s1*0\stopGraceSlur
 }
+
+startSlashedGraceMusic =  {
+  \override Stem  #'stroke-style = #"grace"
+}
+
+stopSlashedGraceMusic =  {
+  \revert Stem #'stroke-style
+}