From 3c18df86680573bee4b4b83901602693eaf4f9cd Mon Sep 17 00:00:00 2001
From: fred <fred>
Date: Sun, 24 Mar 2002 19:42:37 +0000
Subject: [PATCH] lilypond-0.0.61

---
 lily/text-reg.cc | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lily/text-reg.cc b/lily/text-reg.cc
index 82e12d6cd7..a3231cec41 100644
--- a/lily/text-reg.cc
+++ b/lily/text-reg.cc
@@ -39,7 +39,7 @@ void
 Text_register::process_requests()
 {
     if (text_req_l_) {
-	text_p_ = new Text_item(text_req_l_->tdef_p_, 0); // ugh
+	text_p_ = new Text_item(text_req_l_->tdef_p_, text_req_l_->dir_i_); // ugh
 	announce_element(Staff_elem_info(text_p_, text_req_l_));
     }
 }
@@ -47,7 +47,8 @@ void
 Text_register::pre_move_processing()
 {
     if (text_p_) {
-	text_p_->dir_i_ = dir_i_;
+	if (dir_i_ && !text_p_->dir_i_)
+	    text_p_->dir_i_ = dir_i_;
 	Staff_symbol* s_l = get_staff_info().staff_sym_l_;
 	text_p_->set_staffsym(s_l);
 	typeset_element(text_p_);
-- 
2.39.5