From 5ebb92867cfd24353f01e32e1dab602c2c40d8ba Mon Sep 17 00:00:00 2001
From: David Kastrup <dak@gnu.org>
Date: Sun, 6 Mar 2016 10:45:16 +0100
Subject: [PATCH] Issue 4785: Let TextSpanner inherit any direction set in
event
Something like c_\startTextSpan should create a TextSpanner below the system.
---
lily/text-spanner-engraver.cc | 2 ++
1 file changed, 2 insertions(+)
diff --git a/lily/text-spanner-engraver.cc b/lily/text-spanner-engraver.cc
index f34f494301..249fdce04a 100644
--- a/lily/text-spanner-engraver.cc
+++ b/lily/text-spanner-engraver.cc
@@ -87,6 +87,8 @@ Text_spanner_engraver::process_music ()
{
current_event_ = event_drul_[START];
span_ = make_spanner ("TextSpanner", event_drul_[START]->self_scm ());
+ if (Direction d = to_dir (current_event_->get_property ("direction")))
+ span_->set_property ("direction", scm_from_int (d));
Side_position_interface::set_axis (span_, Y_AXIS);
event_drul_[START] = 0;
--
2.39.5