]> git.donarmstrong.com Git - lilypond.git/commitdiff
new file: excercise SVG backend during regtest. Requires inkscape.
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Sat, 3 Feb 2007 18:03:16 +0000 (19:03 +0100)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Sat, 3 Feb 2007 18:03:16 +0000 (19:03 +0100)
input/regression/backend-svg.ly [new file with mode: 0644]

diff --git a/input/regression/backend-svg.ly b/input/regression/backend-svg.ly
new file mode 100644 (file)
index 0000000..f1db2af
--- /dev/null
@@ -0,0 +1,35 @@
+
+#(ly:set-option 'backend 'svg)
+#(set! output-count 1)
+
+
+\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))
+#(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 "s-1.eps" outname)
+      }
+      x x x
+    }
+  }
+}