]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/repeat-tie-engraver.cc
Doc: NR - Explain LP footer string is 'tagline'
[lilypond.git] / lily / repeat-tie-engraver.cc
index 9c59ac01c9a85131360b31e84da92676dc1df4e1..4eea8e5800ae271fe103da8241a225a1790386c0 100644 (file)
@@ -68,7 +68,7 @@ Repeat_tie_engraver::acknowledge_note_head (Grob_info inf)
 
   if (!semi_tie_column_)
     {
-      semi_tie_column_ = make_item ("RepeatTieColumn", event_->self_scm ());
+      semi_tie_column_ = make_item ("RepeatTieColumn", SCM_EOL);
     }
 
   SCM cause = event_->self_scm ();
@@ -80,9 +80,9 @@ Repeat_tie_engraver::acknowledge_note_head (Grob_info inf)
   semi_tie->set_parent (semi_tie_column_, Y_AXIS);
   semi_ties_.push_back (semi_tie);
 
-  if (is_direction (Stream_event::unsmob (cause)->get_property ("direction")))
+  if (is_direction (unsmob<Stream_event> (cause)->get_property ("direction")))
     {
-      Direction d = to_dir (Stream_event::unsmob (cause)->get_property ("direction"));
+      Direction d = to_dir (unsmob<Stream_event> (cause)->get_property ("direction"));
       semi_tie->set_property ("direction", scm_from_int (d));
     }