source file of the GNU LilyPond music typesetter
- (c) 2004--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ (c) 2004--2009 Han-Wen Nienhuys <hanwen@xs4all.nl>
*/
#include "text-interface.hh"
{
public:
DECLARE_SCHEME_CALLBACK (print, (SCM));
- static bool has_interface (Grob *);
+ DECLARE_GROB_INTERFACE ();
};
MAKE_SCHEME_CALLBACK (Balloon_interface, print, 1);
Grob *p = me->get_parent (X_AXIS);
- Offset off(me->relative_coordinate (p, X_AXIS),
- me->relative_coordinate (p, Y_AXIS));
+ Offset off (me->relative_coordinate (p, X_AXIS),
+ me->relative_coordinate (p, Y_AXIS));
Box b (p->extent (p, X_AXIS),
p->extent (p, Y_AXIS));
SCM chain = Font_interface::text_font_alist_chain (me);
SCM stencil = Text_interface::interpret_markup (me->layout ()->self_scm (),
- chain, bt);
+ chain, bt);
Stencil *text_stil = unsmob_stencil (stencil);
return fr.smobbed_copy ();
}
-ADD_INTERFACE (Balloon_interface, "text-balloon-interface",
- "A collection of routines to put text balloons around an object.",
+ADD_INTERFACE (Balloon_interface,
+ "A collection of routines to put text balloons around an"
+ " object.",
/* properties */
"padding "