slur-padding for portato script.
2006-09-20 Han-Wen Nienhuys <hanwen@lilypond.org>
2006-09-20 Han-Wen Nienhuys <hanwen@lilypond.org>
+ * scm/script.scm (default-script-alist): avoid-slur and
+ slur-padding for portato script.
+
* lily/stem-tremolo.cc (translated_stencil): new function.
(height): use new function. Fixes tremolos on whole notes.
* lily/stem-tremolo.cc (translated_stencil): new function.
(height): use new function. Fixes tremolos on whole notes.
class Script_engraver : public Engraver
{
vector<Script_tuple> scripts_;
class Script_engraver : public Engraver
{
vector<Script_tuple> scripts_;
protected:
void stop_translation_timestep ();
void process_music ();
DECLARE_TRANSLATOR_LISTENER (articulation);
protected:
void stop_translation_timestep ();
void process_music ();
DECLARE_TRANSLATOR_LISTENER (articulation);
- DECLARE_ACKNOWLEDGER (slur);
DECLARE_ACKNOWLEDGER (rhythmic_head);
DECLARE_ACKNOWLEDGER (stem);
DECLARE_ACKNOWLEDGER (stem_tremolo);
DECLARE_ACKNOWLEDGER (rhythmic_head);
DECLARE_ACKNOWLEDGER (stem);
DECLARE_ACKNOWLEDGER (stem_tremolo);
Script_engraver::Script_engraver ()
{
Script_engraver::Script_engraver ()
{
}
IMPLEMENT_TRANSLATOR_LISTENER (Script_engraver, articulation);
}
IMPLEMENT_TRANSLATOR_LISTENER (Script_engraver, articulation);
-void
-Script_engraver::acknowledge_slur (Grob_info info)
-{
- slur_ = info.spanner ();
-}
-
void
Script_engraver::stop_translation_timestep ()
{
scripts_.clear ();
}
void
Script_engraver::stop_translation_timestep ()
{
scripts_.clear ();
}
-ADD_ACKNOWLEDGER (Script_engraver, slur);
ADD_ACKNOWLEDGER (Script_engraver, rhythmic_head);
ADD_ACKNOWLEDGER (Script_engraver, stem);
ADD_ACKNOWLEDGER (Script_engraver, note_column);
ADD_ACKNOWLEDGER (Script_engraver, rhythmic_head);
ADD_ACKNOWLEDGER (Script_engraver, stem);
ADD_ACKNOWLEDGER (Script_engraver, note_column);
("portato" .
((script-stencil . (feta . ("uportato" . "dportato")))
("portato" .
((script-stencil . (feta . ("uportato" . "dportato")))
+ (avoid-slur . around)
+ (slur-padding . 0.3)
(side-relative-direction . -1)))
("accentus" .
(side-relative-direction . -1)))
("accentus" .