bugfixes for git-update-changelog.py

[lilypond.git] / lily / music.cc

diff --git a/lily/music.cc b/lily/music.cc
index b938c86e2235bc5235b3081a6623d218eb142b6c..1253e728603178c3d308e170597458adb87c2968 100644 (file)
--- a/lily/music.cc
+++ b/lily/music.cc
@@ -253,21 +253,7 @@ Music::origin () const
 Stream_event *
 Music::to_event () const
 {
-  /* UGH. Temp hack */
-  SCM orig_sym = get_property ("name");
-  char out[200];
-  string in = ly_symbol2string (orig_sym);
-  /* don't add '-' before first character */
-  out[0] = tolower (in[0]);
-  size_t outpos = 1;
-  for (size_t inpos = 1; inpos < in.size () && outpos < 190; inpos++)
-    {
-      if (isupper (in[inpos]))
-       out[outpos++] = '-';
-      out[outpos++] = tolower (in[inpos]);      
-    }
-  out[outpos] = 0;
-  SCM class_name = ly_symbol2scm (out);
+  SCM class_name = ly_camel_case_to_lisp_identifier (get_property ("name"));
 
   // catch programming mistakes.
   if (!internal_is_music_type (class_name))