]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/output-sodipodi.scm
* lily/lily-guile.cc (ly:number->string): Do not leave space at
[lilypond.git] / scm / output-sodipodi.scm
index 68a878d5e6c7b92d25efb99072fbcdfa78efe858..5d79103a5f6f6f9fe58f2ae52d238570e8bd08c5 100644 (file)
 (define (control-flip-y c)
   (cons (car c) (* -1 (cdr c))))
 
-(define (numbers->string l)
+(define (ly:numbers->string l)
   (string-append
    (number->string (car l))
    (if (null? (cdr l))
        ""
-       (string-append ","  (numbers->string (cdr l))))))
+       (string-append ","  (ly:numbers->string (cdr l))))))
 
 (define (svg-bezier l close)
   (let* ((c0 (car (list-tail l 3)))