*** empty log message ***

[lilypond.git] / scm / define-grobs.scm

diff --git a/scm/define-grobs.scm b/scm/define-grobs.scm
index 9ac56f093c70ee8e78ccbf9e386aa53abeec40f4..6c91ae31592530df22df76d2f6933600645acf35 100644 (file)
--- a/scm/define-grobs.scm
+++ b/scm/define-grobs.scm
@@ -314,6 +314,14 @@
                 (interfaces . (staff-symbol-referencer-interface
                                beam-interface))))))
 
+    (BendAfter
+     . (
+       (stencil . ,fall::print)
+       (thickness . 2.0)
+       (meta . ((class . Spanner)
+                (interfaces . (spanner-interface
+                               fall-interface))))))
+
     (BreakAlignment
      . (
        (non-musical . #t)
@@ -603,6 +611,7 @@
                                dynamic-text-spanner-interface
                                spanner-interface))))))
 
+                               
     (Fingering
      . (