patch::: 1.5.14.jcn1

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

diff --git a/lily/context-specced-music.cc b/lily/context-specced-music.cc
index eb3005964eac7609867e9167eba0a2d13588ab22..f0373b2dca98fc05145513a63fd6b1c1aee63e45 100644 (file)
--- a/lily/context-specced-music.cc
+++ b/lily/context-specced-music.cc
@@ -3,12 +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 (SCM m)
+  : Music_wrapper (m)
+{
+  set_mus_property ("type",
+                   ly_symbol2scm ("context-specced-music"));
+}
 
-Context_specced_music::Context_specced_music(Music *m)
-  : Music_wrapper  (m)
+
+Context_specced_music::Context_specced_music ()
 {
+  set_mus_property ("type",
+                   ly_symbol2scm ("context-specced-music"));
 }
+
+ADD_MUSIC (Context_specced_music);