*** empty log message ***

[lilypond.git] / scm / output-svg.scm

diff --git a/scm/output-svg.scm b/scm/output-svg.scm
index 88634e7b3437102787df21b646d4599693a44dfd..c21a954e8582b16a48d0bc62d036dd6f165db2fb 100644 (file)
--- a/scm/output-svg.scm
+++ b/scm/output-svg.scm
@@ -115,7 +115,7 @@
 
 (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)))