From dfa24e0cf5031563fef2e374684296040b35c43e Mon Sep 17 00:00:00 2001 From: Han-Wen Nienhuys Date: Wed, 12 Sep 2007 01:55:33 +0200 Subject: [PATCH] Fix #323. Clear avoid-slur for horizontal scripts. --- input/regression/script-horizontal-slur.ly | 17 +++++++++++++++++ lily/new-fingering-engraver.cc | 2 +- 2 files changed, 18 insertions(+), 1 deletion(-) create mode 100644 input/regression/script-horizontal-slur.ly diff --git a/input/regression/script-horizontal-slur.ly b/input/regression/script-horizontal-slur.ly new file mode 100644 index 0000000000..a45b5c0c27 --- /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 a4e05dadbf..1aaa6a04eb 100644 --- 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, -- 2.39.5