]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/event.cc
* flower
[lilypond.git] / lily / event.cc
index bdadc3283c686c0be4bab3abe3cdcdbe8eb1e135..314ed194d611d4674af1619aab9a5cc2264c654d 100644 (file)
@@ -9,11 +9,11 @@
 #include "event.hh"
 #include "warn.hh"
 
-MAKE_SCHEME_CALLBACK(Event, length_callback, 1);
+MAKE_SCHEME_CALLBACK (Event, length_callback, 1);
 SCM
 Event::length_callback (SCM m)
 {
-  Musicme = unsmob_music (m);
+  Music *me = unsmob_music (m);
   Duration *d = unsmob_duration (me->get_property ("duration"));
 
   Moment mom;
@@ -21,9 +21,9 @@ Event::length_callback (SCM m)
     {
       mom = d->get_length ();
     }
-  return mom.smobbed_copy();
+  return mom.smobbed_copy ();
 }
-  
+
 Event::Event (SCM i)
   : Music (i)
 {
@@ -35,5 +35,3 @@ Event::Event (SCM i)
 
 ADD_MUSIC (Event);
 
-
-