Merge with master

[lilypond.git] / lily / music.cc

diff --git a/lily/music.cc b/lily/music.cc
index b22e243139690aa239ea475d7a6bff176675afe0..77c8f34335629a5c75c4d2e7e9614976e95e259e 100644 (file)
--- a/lily/music.cc
+++ b/lily/music.cc
@@ -250,7 +250,7 @@ Music::origin () const
 Stream_event *
 Music::to_event () const
 {
-  SCM class_name = ly_camel_case_to_lisp_identifier (get_property ("name"));
+  SCM class_name = ly_camel_case_2_lisp_identifier (get_property ("name"));
 
   // catch programming mistakes.
   if (!internal_is_music_type (class_name))