Remove an obsolete comment

[debbugs.git] / t / 07_bugreport.t

diff --git a/t/07_bugreport.t b/t/07_bugreport.t
index 18ccbc5c9cc472dbf759da64d87e74bac9416d41..3600e1ca7a35684e6b4120399bb4895d508b225d 100644 (file)
--- a/t/07_bugreport.t
+++ b/t/07_bugreport.t
@@ -1,7 +1,7 @@
 # -*- mode: cperl;-*-
 
 
-use Test::More tests => 3;
+use Test::More tests => 8;
 
 use warnings;
 use strict;
@@ -77,4 +77,20 @@ $mech->get_ok('http://localhost:'.$port.'/?bug=1',
 ok($mech->content() =~ qr/\<title\>\#1.+Submitting a bug/i,
    'Title of bug is submitting a bug');
 
+$mech->get_ok('http://localhost:'.$port.'/?bug=1;mbox=yes',
+              'Page received ok');
+ok($mech->content() =~ qr/Subject: Submitting a bug/i,
+   'Subject of bug maibox is right');
+ok($mech->content() =~ qr/^From /m,
+   'Starts with a From appropriately');
+
+$mech->get_ok('http://localhost:'.$port.'/?bug=1;mboxmaint=yes',
+              'Page received ok');
+print STDERR $mech->content();
+ok($mech->content() !~ qr/[\x01\x02\x03\x05\x06\x07]/i,
+   'No unescaped states');
+
+
+
 # Other tests for bugs in the page should be added here eventually
+