]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/script-engraver.cc
release: 1.1.0
[lilypond.git] / lily / script-engraver.cc
index 435e312729ed365241da483aa725374fca0c64c1..f27577e44b17e5228dfb110f148fb5a48021240c 100644 (file)
@@ -21,7 +21,7 @@ Script_engraver::Script_engraver()
 bool
 Script_engraver::do_try_request (Request *r_l)
 {
-  if (!r_l->access_Musical_req () || ! r_l->access_Musical_req ()->access_Musical_script_req ())
+  if (!dynamic_cast <Musical_script_req *> (r_l))
     return false ;
   
   for (int i=0; i < script_req_l_arr_.size(); i++) 
@@ -29,7 +29,7 @@ Script_engraver::do_try_request (Request *r_l)
       if (r_l->equal_b (script_req_l_arr_[i]))
        return true;
     }
-  script_req_l_arr_.push (r_l->access_Script_req ());
+  script_req_l_arr_.push (dynamic_cast <Script_req *> (r_l));
   
   return true;
 }
@@ -69,6 +69,11 @@ Script_engraver::do_pre_move_processing()
            {
              td_l->style_str_= style;
            }
+         Scalar alignment = get_property ("textalignment");
+         if (alignment.isnum_b())
+           {
+             td_l->align_dir_= (Direction)(int)alignment;
+           }
        }
       typeset_element (script_p);
     }