]> git.donarmstrong.com Git - lilypond.git/commitdiff
*** empty log message ***
authorJan Nieuwenhuizen <janneke@gnu.org>
Wed, 17 Nov 2004 00:03:19 +0000 (00:03 +0000)
committerJan Nieuwenhuizen <janneke@gnu.org>
Wed, 17 Nov 2004 00:03:19 +0000 (00:03 +0000)
scm/output-svg.scm

index 88634e7b3437102787df21b646d4599693a44dfd..c21a954e8582b16a48d0bc62d036dd6f165db2fb 100644 (file)
 
 (define (svg-font font)
   (let* ((encoding (ly:font-encoding font))
-        (anchor (if (memq encoding '(fetaMusic fetaBraces)) 'start 'middle)))
+        (anchor (if (memq encoding '(fetaMusic fetaBraces)) 'start 'start)))
    (format #f "font-family:~a;font-size:~a;text-anchor:~S;"
           (font-family font) (font-size font) anchor)))