]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/clef-modifier.cc
Issue 5167/6: Changes: show \markup xxx = ... \etc assignments
[lilypond.git] / lily / clef-modifier.cc
index 04ae174f6fbc9a84c7c738d3fe1c78ab26db1f2f..c6ce950fc04a64ab5a6abf28bdaa05fda706876f 100644 (file)
 struct Clef_modifier
 {
   DECLARE_SCHEME_CALLBACK (calc_parent_alignment, (SCM));
-  DECLARE_GROB_INTERFACE ();
 };
 
 MAKE_SCHEME_CALLBACK (Clef_modifier, calc_parent_alignment, 1)
 SCM
 Clef_modifier::calc_parent_alignment (SCM smob)
 {
-  Grob *me = Grob::unsmob (smob);
+  Grob *me = unsmob<Grob> (smob);
   Grob *clef = me->get_parent (X_AXIS);
   string full_clef_name = ly_scm2string (clef->get_property ("glyph"));
   string clef_name = replace_all(&full_clef_name, "clefs.", "");