X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fcontext-specced-music.cc;h=f0373b2dca98fc05145513a63fd6b1c1aee63e45;hb=50cb93642631297394c1d1e108ecc42cfbadd644;hp=7e52caf95736cdfec2651893ab6951395aa79601;hpb=8da6cef580cce3365b219f6aca429b434cb60fcf;p=lilypond.git

diff --git a/lily/context-specced-music.cc b/lily/context-specced-music.cc
index 7e52caf957..f0373b2dca 100644
--- a/lily/context-specced-music.cc
+++ b/lily/context-specced-music.cc
@@ -3,15 +3,22 @@
   
   source file of the GNU LilyPond music typesetter
   
-  (c) 1999--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  (c) 1999--2001 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   
  */
 #include "context-specced-music.hh"
-Context_specced_music::Context_specced_music(Music *m)
-  : Music_wrapper  (m)
+Context_specced_music::Context_specced_music (SCM m)
+  : Music_wrapper (m)
 {
   set_mus_property ("type",
+		    ly_symbol2scm ("context-specced-music"));
+}
+
 
+Context_specced_music::Context_specced_music ()
+{
+  set_mus_property ("type",
 		    ly_symbol2scm ("context-specced-music"));
 }
 
+ADD_MUSIC (Context_specced_music);