]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/output-svg.scm
update doc files.
[lilypond.git] / scm / output-svg.scm
index 2e953a94b29591dc8236c33d23b3e6f18eb95cbd..27dfe4e74aafbc6b3c81d7f98038e54f444a41bc 100644 (file)
         (map (lambda (x) (char->entity x)) (string->list string))))
 
 (define pango-description-regexp-comma
-  (make-regexp "^([^,]+), ?([-a-zA-Z_]*) ([0-9.]+)$"))
+  (make-regexp "([^,]+), ?([-a-zA-Z_]*) ([0-9.]+)$"))
 
 (define pango-description-regexp-nocomma
-  (make-regexp "^([^ ]+) ([-a-zA-Z_]*) ?([0-9.]+)$"))
+  (make-regexp "([^ ]+) ([-a-zA-Z_]*) ?([0-9.]+)$"))
 
 (define (pango-description-to-svg-font str)
   (let*