X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fto-xml.ly;h=0a3cc4a35d1cd7f00b6aed6395b4f05eabb97885;hb=26755a173be10b19327c99d4c7510f30974facd4;hp=c2f39725c9592bacf6aefd875fd12777f77c4358;hpb=8c44df622129b5352d9770bc28969e767a415b2e;p=lilypond.git

diff --git a/input/regression/to-xml.ly b/input/regression/to-xml.ly
index c2f39725c9..0a3cc4a35d 100644
--- 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 =
@@ -15,4 +14,3 @@ testMusic =  { << c''4 \\ g'4 >> }
 
 
 { \testMusic }
-