[patch] more about embed.fnc in perlguts

[p5sagit/p5-mst-13.2.git] / t / run / switchd.t

diff --git a/t/run/switchd.t b/t/run/switchd.t
index 83d4976..160ea99 100644 (file)
--- a/t/run/switchd.t
+++ b/t/run/switchd.t
@@ -32,9 +32,9 @@ __SWDTEST__
     push @tmpfiles, $filename;
     $| = 1; # Unbufferize.
     $r = runperl(
-                switches => [ '-Ilib', '-d:DevelTest' ],
+                switches => [ '-Ilib', '-d:switchd' ],
                 progfile => $filename,
                );
-    like($r, qr/^main,swdtest.tmp,9;Foo,swdtest.tmp,5;Foo,swdtest.tmp,6;Foo,swdtest.tmp,6;Bar,swdtest.tmp,2;Foo,swdtest.tmp,6;Bar,swdtest.tmp,2;Foo,swdtest.tmp,6;Bar,swdtest.tmp,2;Foo,swdtest.tmp,6;$/i);
+    like($r, qr/^main,swdtest.tmp,9;Foo,swdtest.tmp,5;Foo,swdtest.tmp,6;Foo,swdtest.tmp,6;Bar,swdtest.tmp,2;Bar,swdtest.tmp,2;Bar,swdtest.tmp,2;$/i);
 }