patch::: 1.5.18.moh1: [PATCH] 1.4 Lyric alignment

[lilypond.git] / lily / music-output-def.cc

diff --git a/lily/music-output-def.cc b/lily/music-output-def.cc
index c37cf1178b9dee97f18c8c024bc1564df7d87cf7..df2c404764e8f5b081df9d0f08b3233f4596351d 100644 (file)
--- a/lily/music-output-def.cc
+++ b/lily/music-output-def.cc
@@ -66,7 +66,7 @@ Music_output_def::Music_output_def (Music_output_def const &s)
 
 
 IMPLEMENT_SMOBS (Music_output_def);
-IMPLEMENT_UNSMOB (Music_output_def,music_output_def);
+
 IMPLEMENT_DEFAULT_EQUAL_P (Music_output_def);
 
 SCM
@@ -128,9 +128,9 @@ Music_output_def::get_global_translator_p ()
 int
 Music_output_def::print_smob (SCM s, SCM p, scm_print_state *)
 {
-  Translator_def * def = unsmob_translator_def (s);
+  Music_output_def * def = unsmob_music_output_def (s);
   scm_puts ("#<Music_output_def ", p);
-  scm_write (def->type_name_, p);
+  //scm_write (def->type_name_, p);
   scm_puts (">", p);
   return 1;
 }