* scm/define-grobs.scm (all-grob-descriptions): reorganize in

[lilypond.git] / lily / font-interface.cc

diff --git a/lily/font-interface.cc b/lily/font-interface.cc
index 878c3031a413fc42c2866dcfae9f890cecf712d4..c9400629ae49589d88c0cc2d8a88ba0350611366 100644 (file)
--- a/lily/font-interface.cc
+++ b/lily/font-interface.cc
@@ -29,16 +29,6 @@ Font_interface::get_default_font (Grob *me)
   return fm;
 }
 
-LY_DEFINE (ly_font_interface_get_default_font, "ly:get-default-font",
-          1, 0, 0, (SCM grob),
-          "Return the default font for grob @var{gr}.")
-{
-  Grob *gr = unsmob_grob (grob);
-  SCM_ASSERT_TYPE (gr, grob, SCM_ARG1, __FUNCTION__, "grob");
-
-  return Font_interface::get_default_font (gr)->self_scm ();
-}
-
 SCM
 Font_interface::music_font_alist_chain (Grob *g)
 {