]> git.donarmstrong.com Git - lilypond.git/commitdiff
SVG backend: fix loading of new fetaText strings.
authorPatrick McCarty <pnorcks@gmail.com>
Sun, 7 Mar 2010 19:53:14 +0000 (11:53 -0800)
committerPatrick McCarty <pnorcks@gmail.com>
Sun, 7 Mar 2010 20:01:44 +0000 (12:01 -0800)
The hackish workaround for substituting "emmentaler" for "feta-alphabet"
is no longer needed.

scm/lily-library.scm

index eebc231ac574b572c05a8b04a676cf10c3c46822..262d912b9c4f7fadd0f6f958850245d8250851ef 100644 (file)
@@ -698,14 +698,8 @@ applied to function @var{getter}.")
 
 ;;; FONT may be font smob, or pango font string...
 (define-public (font-name-style font)
-  ;; FIXME: ughr, barf: feta-alphabet is actually emmentaler
-  (if (and (string? font)
-          (string-prefix? "feta-alphabet" font))
-      (string-append "emmentaler"
-                    "-"
-                    (substring font
-                               (string-length "feta-alphabet")
-                               (string-length font)))
+  (if (string? font)
+      (string-downcase font)
       (let* ((font-name (ly:font-name font))
             (full-name (if font-name font-name (ly:font-file-name font))))
          (string-downcase full-name))))