X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=t%2F07_control_limit.t;h=ae3e98aa87f60c19dea12344d806e1a31c85f82e;hb=ee73b48c52cedb53381b6c0291693fa1e2a66d2c;hp=f4f600ba5409f64af63d562b3d7532f2f349c959;hpb=5b550d03e9214a7980a5cd4897cf9de09d89749b;p=debbugs.git diff --git a/t/07_control_limit.t b/t/07_control_limit.t index f4f600b..ae3e98a 100644 --- a/t/07_control_limit.t +++ b/t/07_control_limit.t @@ -24,25 +24,14 @@ use Data::Dumper; # HTTP::Server:::Simple defines a SIG{CHLD} handler that breaks system; undef it here. $SIG{CHLD} = sub {}; -my %config; -eval { - %config = create_debbugs_configuration(debug => exists $ENV{DEBUG}?$ENV{DEBUG}:0); -}; -if ($@) { - BAIL_OUT($@); -} +my %config = create_debbugs_configuration(); + my $sendmail_dir = $config{sendmail_dir}; my $spool_dir = $config{spool_dir}; my $config_dir = $config{config_dir}; -END{ - if ($ENV{DEBUG}) { - diag("spool_dir: $spool_dir\n"); - diag("config_dir: $config_dir\n"); - diag("sendmail_dir: $sendmail_dir\n"); - } -} + # We're going to use create mime message to create these messages, and # then just send them to receive. @@ -78,7 +67,7 @@ $SD_SIZE = 'control@bugs.something messages appear to have been sent out properly'); # make sure this fails -ok(system('sh','-c','find '.$sendmail_dir.q( -type f | xargs grep -q "Subject: Processed (with 1 errors): Munging a bug with limit_package_bar")) == 0, +ok(system('sh','-c','find '.$sendmail_dir.q( -type f | xargs grep -q "Subject: Processed (with 1 error): Munging a bug with limit_package_bar")) == 0, 'control@bugs.something'. "limit message failed with 1 error"); send_message(to => 'control@bugs.something', @@ -134,7 +123,7 @@ $SD_SIZE = 'control@bugs.something messages appear to have been sent out properly'); # make sure this fails -ok(system('sh','-c','find '.$sendmail_dir.q( -type f | xargs grep -q "Subject: Processed (with 1 errors): Munging a bug with limit_package_bar")) == 0, +ok(system('sh','-c','find '.$sendmail_dir.q( -type f | xargs grep -q "Subject: Processed (with 1 error): Munging a bug with limit_package_bar")) == 0, 'control@bugs.something'. "limit message failed with 1 error"); send_message(to => 'control@bugs.something',