patch::: 1.4.0.jcn4

[lilypond.git] / lily / context-specced-music.cc

diff --git a/lily/context-specced-music.cc b/lily/context-specced-music.cc
index 7e52caf95736cdfec2651893ab6951395aa79601..f0373b2dca98fc05145513a63fd6b1c1aee63e45 100644 (file)
--- 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);