X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F07-debugger.t;fp=t%2F07-debugger.t;h=8155214575a3dcfe09670715580185219c13b6c4;hb=39bc2d6e65e2e1898be6219299f2e8a09e7a7b1c;hp=9e721221ca08433b20a1bd55c302a83af3248f0a;hpb=03073cbe7cf94068a5ee4cebec2472d7cb137169;p=p5sagit%2Fnamespace-clean.git

diff --git a/t/07-debugger.t b/t/07-debugger.t
index 9e72122..8155214 100644
--- a/t/07-debugger.t
+++ b/t/07-debugger.t
@@ -9,6 +9,9 @@ BEGIN {
   ) {
     plan skip_all => $missing_xs;
   }
+  else {
+    plan tests => 4;
+  }
 }
 
 BEGIN {
@@ -20,7 +23,7 @@ BEGIN {
 
 #line 1
 #!/usr/bin/perl -d
-#line 10
+#line 27
 
 }
 
@@ -42,5 +45,3 @@ ok( !Foo->can("foo"), "foo cleaned up" );
 ok( !Foo->can("baz"), "baz cleaned up" );
 
 Foo->bar();
-
-done_testing;