Fix #323.

Clear avoid-slur for horizontal scripts.

diff --git a/input/regression/script-horizontal-slur.ly b/input/regression/script-horizontal-slur.ly
new file mode 100644 (file)
index 0000000..a45b5c0
--- /dev/null
+++ b/input/regression/script-horizontal-slur.ly
@@ -0,0 +1,17 @@
+\version "2.11.20"
+
+\header {
+  texidoc = "Horizontal scripts don't have @code{avoid-slur} set."
+}
+
+\layout {
+  ragged-right = ##t
+}
+
+\relative c'' { 
+  \set fingeringOrientations = #'(right)
+  < a-1 d-2>2
+  < a-1 d-2>2
+  < a-1 d-2>2(
+  < a-1 d-2>2)
+}

diff --git a/lily/new-fingering-engraver.cc b/lily/new-fingering-engraver.cc
index a4e05dadbfdc6d5c8ef31148d4667a92612785df..1aaa6a04eb791b9ca3b925177eae53d2305ed6ef 100644 (file)
--- a/lily/new-fingering-engraver.cc
+++ b/lily/new-fingering-engraver.cc
@@ -249,7 +249,7 @@ New_fingering_engraver::position_scripts (SCM orientations,
       Grob *f = ft.script_;
       f->set_parent (ft.head_, X_AXIS);
       f->set_parent (ft.head_, Y_AXIS);
-
+      f->set_property ("avoid-slur", SCM_BOOL_F);
       if (hordir == LEFT
          && unsmob_grob (ft.head_->get_object ("accidental-grob")))
        Side_position_interface::add_support (f,