#include "font-interface.hh"
/*
- FIXME: should use symbol for #'style.
+ FIXME: should use symbol for #'style.
*/
MAKE_SCHEME_CALLBACK (Clef, before_line_breaking, 1);
SCM
&& !to_boolean (s->get_property ("full-size-change")))
{
str += "_change";
- s->set_property ("glyph-name", scm_makfrom0str (str.to_str0 ()));
+ s->set_property ("glyph-name", scm_makfrom0str (str.to_str0 ()));
}
}
}
MAKE_SCHEME_CALLBACK (Clef, print, 1)
-SCM
+ SCM
Clef::print (SCM smob)
{
Grob *me = unsmob_grob (smob);
}
ADD_INTERFACE (Clef, "clef-interface",
- "A clef sign",
- "non-default full-size-change glyph-name");
+ "A clef sign",
+ "non-default full-size-change glyph-name");