summaryrefslogtreecommitdiff
path: root/lily
diff options
context:
space:
mode:
authorDavid Kastrup <dak@gnu.org>2016-03-06 10:45:16 +0100
committerDavid Kastrup <dak@gnu.org>2016-03-13 12:24:03 +0100
commit5ebb92867cfd24353f01e32e1dab602c2c40d8ba (patch)
tree8d9e5a59587d07838126957d802e523ec47755f5 /lily
parentda29b6afafafc26af4abb317ad23c88e4975c205 (diff)
Issue 4785: Let TextSpanner inherit any direction set in event
Something like c_\startTextSpan should create a TextSpanner below the system.
Diffstat (limited to 'lily')
-rw-r--r--lily/text-spanner-engraver.cc2
1 files changed, 2 insertions, 0 deletions
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;