From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Wed, 3 Jan 2007 15:31:16 +0000 (+0100)
Subject: Fix #193.
X-Git-Tag: release/2.11.8-1~5
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=8f125843bd58e1985cf42a4b249b48a8c2f3db9b;p=lilypond.git

Fix #193.

Add accidental to horizontal fingering side-support.
---

diff --git a/input/regression/finger-chords-accidental.ly b/input/regression/finger-chords-accidental.ly
new file mode 100644
index 0000000000..3ae06a4e62
--- /dev/null
+++ b/input/regression/finger-chords-accidental.ly
@@ -0,0 +1,15 @@
+\version "2.10.8"
+\header
+{
+  texidoc = "Scripts left of a chord avoid accidentals."
+}
+
+\paper {
+  ragged-right = ##t
+}
+
+{
+  r4 
+  \set fingeringOrientations = #'(left)
+  <cis''-3 >
+}
diff --git a/lily/new-fingering-engraver.cc b/lily/new-fingering-engraver.cc
index 1ae7794393..cd2d0487c0 100644
--- a/lily/new-fingering-engraver.cc
+++ b/lily/new-fingering-engraver.cc
@@ -250,6 +250,11 @@ New_fingering_engraver::position_scripts (SCM orientations,
       f->set_parent (ft.head_, X_AXIS);
       f->set_parent (ft.head_, Y_AXIS);
 
+      if (hordir == LEFT
+	  && unsmob_grob (ft.head_->get_object ("accidental-grob")))
+	Side_position_interface::add_support (f,
+					      unsmob_grob (ft.head_->get_object ("accidental-grob")));
+					      
       Self_alignment_interface::set_align_self (f, Y_AXIS);
       Self_alignment_interface::set_center_parent (f, Y_AXIS);
       Side_position_interface::set_axis (f, X_AXIS);