Fix some bugs in the dynamic engraver and PostScript backend

[lilypond.git] / scm / define-event-classes.scm

diff --git a/scm/define-event-classes.scm b/scm/define-event-classes.scm
index f70e4d57c397eb2ab30ef8e91a1feeaf8a063d1f..84d6ef57d4001d978b463b946f5ebf763ff0b573 100644 (file)
--- a/scm/define-event-classes.scm
+++ b/scm/define-event-classes.scm
@@ -10,18 +10,8 @@
 ;; Event class hierarchy. Each line is on the form ((List of children) . Parent)
 (define event-classes
   '(((StreamEvent) . '())
-    ((RemoveContext ChangeParent Override Revert UnsetProperty
-      SetProperty MusicEvent OldMusicEvent CreateContext Prepare
-      OneTimeStep Finish) . StreamEvent)
-    ((arpeggio-event 
-      beam-event note-event absolute-dynamic-event
-      key-change-event lyric-event pedal-event slur-event tie-event
-      metronome-change-event span-dynamic-event)
-     . MusicEvent)
-    ((decrescendo-event crescendo-event) . span-dynamic-event)
-    ((sostenuto-event sustain-event una-corda-event) . pedal-event)
-    ((Announcement) . '())
-    ((AnnounceNewContext) . Announcement)
+    ((RemoveContext ChangeParent Override Revert UnsetProperty SetProperty 
+      MusicEvent CreateContext Prepare OneTimeStep Finish) . StreamEvent)
     ))
 
 ;; Maps event-class to a list of ancestors (inclusive)