thinko.

[lilypond.git] / input / regression / to-xml.ly

diff --git a/input/regression/to-xml.ly b/input/regression/to-xml.ly
index 7db3f8dd0823ea9bb01ed4347ced8649faada562..0a3cc4a35d1cd7f00b6aed6395b4f05eabb97885 100644 (file)
--- a/input/regression/to-xml.ly
+++ b/input/regression/to-xml.ly
@@ -2,11 +2,10 @@
 
 testMusic =  { << c''4 \\ g'4 >> }
 
-#(load-from-path "to-xml.scm")
+#(use-modules (scm to-xml))
+
+#(ly:progress "\nXML:\n\n~A\n" (call-with-output-string (lambda (p) (music-to-xml testMusic p))))
 
-#(ly:progress "\nXML:\n\n~A\n"
-  (call-with-output-string
-   (lambda (p) (music-to-xml testMusic p))))
 
 \header {
   texidoc =
@@ -14,5 +13,4 @@ testMusic =  { << c''4 \\ g'4 >> }
 }
 
 
-\testMusic
-
+{ \testMusic }