X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fdefine-music-types.scm;h=cf9ea3505d023962a9de64441b6ea6863fe1914e;hb=715153c6137c0a16a1e08ffe03e6937f03c1bf3f;hp=cbd0a1e1ea92da97649bb37a4d1d2cf58a3e26a2;hpb=2134d51fa820c56ac7d5b84038b5a071cbf17a53;p=lilypond.git

diff --git a/scm/define-music-types.scm b/scm/define-music-types.scm
index cbd0a1e1ea..cf9ea3505d 100644
--- a/scm/define-music-types.scm
+++ b/scm/define-music-types.scm
@@ -50,7 +50,7 @@ arguments to func are 1. the grob, 2. the originating context,
 3. context where FUNC is called.
 
 ")
-	(types . (general-music event layout-instruction-event))
+	(types . (general-music event apply-output-event))
 	))
     (ArpeggioEvent 
      . (
@@ -337,7 +337,7 @@ SYNTAX
 
 @code{\\override [ @var{Ctxt} . ] @var{Obj} @var{prop} = @var{val}}
 ")
-	(types . (general-music layout-instruction-event))
+	(types . (general-music layout-instruction-event override-property-event))
 	(iterator-ctor . ,ly:push-property-iterator::constructor)
 	))
     (PageBreakEvent
@@ -607,7 +607,7 @@ Syntax: @code{s}@var{duration}")
     (SustainEvent
      . (
 	(description . "Depress or release sustain pedal. ")
-	(types . (general-music event pedal-event sustain-pedal-event))
+	(types . (general-music event pedal-event sustain-event))
 	))
     
     (SostenutoEvent
@@ -631,12 +631,6 @@ Syntax: @code{\\@var{number}}.")
 	(types . (general-music string-number-event event))
 	)) 
 
-    (MetronomeChangeEvent
-     . (
-	(description .	"Change tempo setting (in beats per minute).")
-	(types . (general-music metronome-change-event tempo-event event))
-	))
-    
     (TextScriptEvent
      . (
 	(description .	"")