source file of the GNU LilyPond music typesetter
- (c) 1997--2002 Jan Nieuwenhuizen <janneke@gnu.org>
+ (c) 1997--2004 Jan Nieuwenhuizen <janneke@gnu.org>
*/
if (tempo_req_)
{
- SCM met = tempo_req_->get_mus_property ("metronome-count");
- Duration *d = unsmob_duration (tempo_req_->get_mus_property ("duration"));
+ SCM met = tempo_req_->get_property ("metronome-count");
+ Duration *d = unsmob_duration (tempo_req_->get_property ("tempo-unit"));
- Rational r = (d->length_mom () / Moment (Rational (1, 4)) * Moment (gh_scm2int (met))).main_part_;
+ Rational r = (d->get_length () / Moment (Rational (1, 4)) * Moment (gh_scm2int (met))).main_part_;
audio_ = new Audio_tempo (int (r));
ENTER_DESCRIPTION (Tempo_performer, "","",
- "tempo-event",
+ "metronome-change-event",
"","","" );