release: 1.1.1

[lilypond.git] / lily / mark-engraver.cc

diff --git a/lily/mark-engraver.cc b/lily/mark-engraver.cc
index 274911951d720d8b77f3fe24a8e5749e18d82d4a..3c25f1aeae76f3122eb686f288635720fed80370 100644 (file)
--- a/lily/mark-engraver.cc
+++ b/lily/mark-engraver.cc
@@ -26,13 +26,12 @@ Mark_engraver::Mark_engraver ()
 bool
 Mark_engraver::do_try_request (Request* r_l)
 {
-  Command_req* c_l = r_l->access_Command_req ();
-  if (!c_l || !c_l->access_Mark_req () || mark_req_l_) 
-    return false;
-
-  mark_req_l_ = c_l->access_Mark_req ();
-
-  return true;
+  if (Mark_req *mr = dynamic_cast <Mark_req *> (r_l))
+    {
+      mark_req_l_ = mr;
+      return true;
+    }
+  return false;
 }
 
 void
@@ -52,7 +51,7 @@ Mark_engraver::do_process_requests ()
   td_p->style_str_ = td_p->text_str_.index_any_i ("0123456789") >= 0 
     ? "mark" : "Large";
 
-  script_p_->dir_ = UP;
+  script_p_->dir_ = LEFT;
   script_p_->specs_p_ = td_p->clone ();
   script_p_->postbreak_only_b_ = true;
   
@@ -66,6 +65,7 @@ Mark_engraver::do_process_requests ()
     {
       script_p_->break_priority_i_ = int(break_priority);
     }
+
   
   announce_element (Score_element_info (script_p_, mark_req_l_));
 }