2
tweak-engraver.cc -- implement Tweak_engraver
4
source file of the GNU LilyPond music typesetter
6
(c) 2005--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
10
#include "engraver.hh"
14
#include "translator.icc"
16
class Tweak_engraver : public Engraver
18
TRANSLATOR_DECLARATIONS (Tweak_engraver);
21
DECLARE_ACKNOWLEDGER (grob);
24
Tweak_engraver::Tweak_engraver()
29
Tweak_engraver::acknowledge_grob (Grob_info info)
31
if (Music *music = info.music_cause ())
33
for (SCM s = music->get_property ("tweaks");
34
scm_is_pair (s); s = scm_cdr (s))
36
info.grob ()->internal_set_property (scm_caar (s), scm_cdar (s));
41
ADD_ACKNOWLEDGER (Tweak_engraver, grob);
42
ADD_TRANSLATOR (Tweak_engraver,
43
/* doc */ "Read the @code{tweaks} property from the originating Music event, and set properties." ,