X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fbackend-svg.ly;h=edb1212ed05c7577a21017d41cd2a487977bf367;hb=b92ea16ef75d8aaa7bdb9f492b58d7af906e7945;hp=db1dfbed701cc3b3df345d45c2102dc898617cbf;hpb=68463909e3d26059c7869143e77d6b1caffd9fa6;p=lilypond.git diff --git a/input/regression/backend-svg.ly b/input/regression/backend-svg.ly index db1dfbed70..edb1212ed0 100644 --- a/input/regression/backend-svg.ly +++ b/input/regression/backend-svg.ly @@ -1,4 +1,5 @@ - +\version "2.14.0" +%{ #(ly:set-option 'backend 'svg) #(set! output-count 1) @@ -6,30 +7,41 @@ \include "typography-demo.ly" - #(define outname (ly:parser-output-name parser)) #(ly:set-option 'backend 'eps) %% TODO: what to do if inkscape fails? -#(display "Invoking inkscape...\n") -#(system (format #f "inkscape -T -E ~a-1.eps ~a-1.svg" outname outname)) +#(ly:progress "Invoking inkscape...\n") + +%% LD_LIBRARY_PATH is necesssary, otherwise, it doesn't build in GUB. +%% LD_LIBRARY_PATH is part of the start-environment but should be switched off +%% for external inkscape. +#(let* + ((cmd (format #f + "LD_LIBRARY_PATH= inkscape --without-gui --export-text-to-path --export-eps ~a-inkscape.eps ~a-1.svg" outname outname))) + (ly:progress "Running ~a" cmd) + (ly:system cmd) + (cons + (format #f "FONTCONFIG_FILE=~a/fonts/fonts.conf" (ly:effective-prefix)) + (ly:start-environment))) + #(set! output-count 0) #(set-default-paper-size "a5") + \book { \header { texidoc = "SVG output, rendered through inkscape." title = "SVG" } - - \score { \lyrics { \markup { - \epsfile #X #30.0 #(format #f "~a-1.eps" outname) + \epsfile #X #30.0 #(format #f "~a-inkscape.eps" outname) } - x x x + bla bla bla } } } +%}