From: Patrick McCarty <pnorcks@gmail.com>
Date: Sun, 1 Nov 2009 20:41:55 +0000 (-0800)
Subject: Fix gonville-brace loading issues
X-Git-Tag: release/2.13.7-0~8
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=6f0cb326aa01709b6039a4c18f6e7e55c8ecf306;p=lilypond.git

Fix gonville-brace loading issues
---

diff --git a/scm/font.scm b/scm/font.scm
index 7c5b865a87..30159bd7c1 100644
--- a/scm/font.scm
+++ b/scm/font.scm
@@ -164,9 +164,9 @@
      (fetaBraces ,(ly:pt 20.0)
 		 #(,(delay (ly:system-font-load
 			    ;;; TODO: rename aybabtu to emmentaler-brace
-			    (string-replace "emmentaler-brace" "aybabtu" 0
-					    (string-length
-					      (string-append name "-brace")))
+			    (if (string=? name "emmentaler")
+				"aybabtu"
+				(string-append name "-brace"))
 			    )))))))
 
 (define-public (add-pango-fonts node lily-family family factor)