X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fledger-line-spanner.cc;h=903a97bb1f88d3c46f450f02e4463944862e6809;hb=029ae298e4c56984889a7fe47dbbc58f6c7055f4;hp=0af662952fc07f7e540a7b298c2d9c94e21f1089;hpb=5657bdc3a7c21fd3c449334bb605a3f04b728f28;p=lilypond.git diff --git a/lily/ledger-line-spanner.cc b/lily/ledger-line-spanner.cc index 0af662952f..903a97bb1f 100644 --- a/lily/ledger-line-spanner.cc +++ b/lily/ledger-line-spanner.cc @@ -96,7 +96,7 @@ Ledger_line_spanner::set_spacing_rods (SCM smob) if (!staff) return SCM_EOL; - Link_array heads (Pointer_group_interface__extract_grobs (me, (Grob*)0, "note-heads")); + Link_array heads (extract_grob_array (me, ly_symbol2scm ("note-heads"))); if (heads.is_empty ()) return SCM_EOL; @@ -200,7 +200,7 @@ SCM Ledger_line_spanner::print (SCM smob) { Spanner *me = dynamic_cast (unsmob_grob (smob)); - Link_array heads (Pointer_group_interface__extract_grobs (me, (Grob*)0, "note-heads")); + Link_array heads (extract_grob_array (me, ly_symbol2scm ("note-heads"))); if (heads.is_empty ()) return SCM_EOL;