From: Patrick McCarty <pnorcks@gmail.com>
Date: Thu, 21 Jan 2010 01:00:10 +0000 (-0800)
Subject: Fix Gonville loading in staff_bracket().
X-Git-Tag: release/2.13.12-1~84
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=cd0d10a33b4874f25afadbb58920163815cb5962;p=lilypond.git

Fix Gonville loading in staff_bracket().

When Gonville is the default music font, Emmentaler bracket tips were
still being used.

This commit fixes the problem, by first finding the default music font
and performing glyph lookups with this font.
---

diff --git a/lily/system-start-delimiter.cc b/lily/system-start-delimiter.cc
index 5ecda098a9..784649d8b7 100644
--- a/lily/system-start-delimiter.cc
+++ b/lily/system-start-delimiter.cc
@@ -33,11 +33,7 @@
 Stencil
 System_start_delimiter::staff_bracket (Grob *me, Real height)
 {
-  SCM fam = scm_cons (ly_symbol2scm ("font-encoding"),
-		      ly_symbol2scm ("fetaMusic"));
-
-  SCM alist = scm_list_n (fam, SCM_UNDEFINED);
-  Font_metric *fm = select_font (me->layout (), scm_list_n (alist, SCM_UNDEFINED));
+  Font_metric *fm = Font_interface::get_default_font (me);
 
   Drul_array<Stencil> tips (fm->find_by_name ("brackettips.down"),
 			    fm->find_by_name ("brackettips.up"));