Fix some bugs in the dynamic engraver and PostScript backend

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

diff --git a/lily/custos-engraver.cc b/lily/custos-engraver.cc
index 82381b764ca012b4d40c1316cef7f8f9a09d33af..3b3f7610e0db9efd36c217fd8c7e851d1e5f74db 100644 (file)
--- a/lily/custos-engraver.cc
+++ b/lily/custos-engraver.cc
@@ -11,10 +11,9 @@
 #include "bar-line.hh"
 #include "item.hh"
 #include "note-head.hh"
-#include "pitch.hh"
 #include "staff-symbol-referencer.hh"
-#include "stream-event.hh"
 #include "warn.hh"
+#include "pitch.hh"
 
 #include "translator.icc"
 
@@ -74,8 +73,8 @@ Custos_engraver::acknowledge_bar (Grob_info info)
 void
 Custos_engraver::acknowledge_note_head (Grob_info info)
 {
-  Stream_event *ev = info.event_cause ();
-  if (ev && ev->in_event_class ("note-event"))
+  Music *m = info.music_cause ();
+  if (m && m->is_mus_type ("note-event"))
     {
 
       /*
@@ -86,7 +85,7 @@ Custos_engraver::acknowledge_note_head (Grob_info info)
        don't look at the staff-position, since we can't be sure
        whether Clef_engraver already applied a vertical shift.
       */
-      pitches_.push_back (*unsmob_pitch (ev->get_property ("pitch")));
+      pitches_.push_back (*unsmob_pitch (m->get_property ("pitch")));
     }
 }