patch::: 1.1.25.jcn1: jcn1

[lilypond.git] / lily / pitch-squash-engraver.cc

diff --git a/lily/pitch-squash-engraver.cc b/lily/pitch-squash-engraver.cc
index 026027ed04d309d1ad3de7376548767c6203b90a..19cdc5736d4f0b293f880f7932038ffdf936db5c 100644 (file)
--- a/lily/pitch-squash-engraver.cc
+++ b/lily/pitch-squash-engraver.cc
@@ -13,13 +13,12 @@
 void
 Pitch_squash_engraver::acknowledge_element (Score_element_info i)
 {
-  if (i.elem_l_->is_type_b (Note_head::static_name ()))
+  if (Note_head *nh = dynamic_cast<Note_head *> (i.elem_l_))
     {
-      Note_head * nl = (Note_head*)i.elem_l_->access_Item ();
-      nl->position_i_  =0;
+      nh->position_i_  =0;
     }
 }
 
 ADD_THIS_TRANSLATOR (Pitch_squash_engraver);
-IMPLEMENT_IS_TYPE_B1(Pitch_squash_engraver, Engraver);
+