]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/translator-scheme.cc
* make/lilypond.fedora.spec.in (Group): add lilypond-internals to
[lilypond.git] / lily / translator-scheme.cc
index 4266e5cf8ef6dc9045fa63336ac558f6939f4f9f..0b484375d561a531911b2bae9c4234570bbf8bdc 100644 (file)
@@ -17,7 +17,7 @@ LY_DEFINE (ly_translator_name, "ly:translator-name",
 {
   Translator *tr = unsmob_translator (trans);
   SCM_ASSERT_TYPE (tr, trans, SCM_ARG1, __FUNCTION__, "Translator");
-  char const *nm = classname (tr);
+  char const *nm = tr->class_name ();
   return ly_symbol2scm (nm);
 }