OLD | NEW |
1 /* | 1 /* |
2 This file is part of LilyPond, the GNU music typesetter. | 2 This file is part of LilyPond, the GNU music typesetter. |
3 | 3 |
4 Copyright (C) 2002--2015 Juergen Reuter <reuter@ipd.uka.de>, | 4 Copyright (C) 2002--2015 Juergen Reuter <reuter@ipd.uka.de>, |
5 Pal Benko <benkop@freestart.hu> | 5 Pal Benko <benkop@freestart.hu> |
6 | 6 |
7 LilyPond is free software: you can redistribute it and/or modify | 7 LilyPond is free software: you can redistribute it and/or modify |
8 it under the terms of the GNU General Public License as published by | 8 it under the terms of the GNU General Public License as published by |
9 the Free Software Foundation, either version 3 of the License, or | 9 the Free Software Foundation, either version 3 of the License, or |
10 (at your option) any later version. | 10 (at your option) any later version. |
(...skipping 482 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
493 if (robust_scm2double (ligature->get_property ("minimum-length"), 0.0) | 493 if (robust_scm2double (ligature->get_property ("minimum-length"), 0.0) |
494 < min_length) | 494 < min_length) |
495 ligature->set_property ("minimum-length", scm_from_double (min_length)); | 495 ligature->set_property ("minimum-length", scm_from_double (min_length)); |
496 } | 496 } |
497 | 497 |
498 | 498 |
499 void | 499 void |
500 Mensural_ligature_engraver::boot () | 500 Mensural_ligature_engraver::boot () |
501 { | 501 { |
502 ADD_LISTENER (Mensural_ligature_engraver, ligature); | 502 ADD_LISTENER (Mensural_ligature_engraver, ligature); |
503 ADD_ACKNOWLEDGER (Mensural_ligature_engraver, rest); | 503 ADD_ACKNOWLEDGER (Ligature_engraver, rest); |
504 ADD_ACKNOWLEDGER (Mensural_ligature_engraver, ligature_head); | 504 ADD_ACKNOWLEDGER (Ligature_engraver, ligature_head); |
505 } | 505 } |
506 | 506 |
507 ADD_TRANSLATOR (Mensural_ligature_engraver, | 507 ADD_TRANSLATOR (Mensural_ligature_engraver, |
508 /* doc */ | 508 /* doc */ |
509 "Handle @code{Mensural_ligature_events} by glueing special" | 509 "Handle @code{Mensural_ligature_events} by glueing special" |
510 " ligature heads together.", | 510 " ligature heads together.", |
511 | 511 |
512 /* create */ | 512 /* create */ |
513 "MensuralLigature ", | 513 "MensuralLigature ", |
514 | 514 |
515 /* read */ | 515 /* read */ |
516 "", | 516 "", |
517 | 517 |
518 /* write */ | 518 /* write */ |
519 "" | 519 "" |
520 ); | 520 ); |
OLD | NEW |