source file of the GNU LilyPond music typesetter
- (c) 1997--2001 Jan Nieuwenhuizen <janneke@gnu.org>
+ (c) 1997--2002 Jan Nieuwenhuizen <janneke@gnu.org>
*/
#include <time.h>
// perhaps multiple text events?
String id_str;
String str = String (_ ("Creator: "));
- id_str = String_convert::pad_to (gnu_lilypond_version_str (), 40);
+ id_str = String_convert::pad_to (gnu_lilypond_version_str (), 30);
str += id_str;
- str += "\n";
/*
This seems silly, but in fact the audio elements should
/* Better not translate this */
str = "Generated automatically by: ";
str += id_str;
- str += _ (", at ");
- time_t t (time (0));
- str += ctime (&t);
- str = str.left_str (str.length_i () - 1);
-
- /*
- Pad out time stamps to 120 chars. */
-
- str = String_convert::pad_to (str, 120);
Audio_text generate_a (Audio_text::TEXT, str);
Midi_text generate (&generate_a);
midi_track.add (Moment (0), &generate);
+
+ str = _ ("at ");
+ time_t t (time (0));
+ str += ctime (&t);
+ str = str.left_str (str.length_i () - 1);
+ str = String_convert::pad_to (str, 60);
+
+ Audio_text at_a (Audio_text::TEXT, str);
+ Midi_text at (&at_a);
+ midi_track.add (Moment (0), &at);
+
str = _f ("from musical definition: %s", origin_str_);
Audio_text from_a (Audio_text::TEXT, str);
midi_track.add (Moment (0), &track_name);
// Some sequencers read track 0 last.
- // Audio_tempo tempo_a (midi_l_->get_tempo_i (Moment (1, 4)));
+ // Audio_tempo tempo_a (midi_l_->get_tempo_i (Moment (Rational (1, 4))));
// Midi_tempo tempo (&tempo_a);
// midi_track.add (Moment (0), &tempo);