2 #(ly:set-option 'backend 'svg)
6 \include "typography-demo.ly"
10 #(define outname (ly:parser-output-name parser))
12 #(ly:set-option 'backend 'eps)
14 %% TODO: what to do if inkscape fails?
15 #(display "Invoking inkscape...\n")
16 #(system (format #f "inkscape -T -E ~a-1.eps ~a-1.svg" outname outname))
17 #(set! output-count 0)
18 #(set-default-paper-size "a5")
21 texidoc = "SVG output, rendered through inkscape."
30 \epsfile #X #30.0 #(format #f "s-1.eps" outname)