X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=t%2F22_oo_interface.t;fp=t%2F22_oo_interface.t;h=55a6b527261afc3b68e2941e98046edd74725cf2;hb=c323dc125afc288248e22532b0383a56ce884c7d;hp=a14b68574ad5eda56c58444fc2770feac9b33ed8;hpb=7908c761e8b425f92178aa73f3aba1edce3ab438;p=debbugs.git

diff --git a/t/22_oo_interface.t b/t/22_oo_interface.t
index a14b685..55a6b52 100644
--- a/t/22_oo_interface.t
+++ b/t/22_oo_interface.t
@@ -35,21 +35,13 @@ $tests++;
 
 # create 4 bugs
 for (1..4) {
-    send_message(to=>'submit@bugs.something',
-		 headers => [To   => 'submit@bugs.something',
-			     From => 'foo@bugs.something',
-			     Subject => 'Submitting a bug '.$_,
-			    ],
-		 run_processall => ($_ == 4 ? 1 : 0),
-		 body => <<EOF) or fail('Unable to send message');
-Package: foo
-Severity: normal
-Tags: wontfix moreinfo
-
-This is a silly bug $_
-EOF
+    submit_bug(subject => 'Submitting a bug '.$_,
+	       pseudoheaders => {Severity => 'normal',
+				 Tags => 'wontfix moreinfo',
+				},
+	      );
 }
-
+run_processall();
 
 my $bc = Debbugs::Collection::Bug->new(bugs => [1..4]);