abstract out create config in tests

[debbugs.git] / t / 08_pkgreport.t

diff --git a/t/08_pkgreport.t b/t/08_pkgreport.t
index df4861d9d0f22f7cd87e5cdae63c4e8796b8360f..97f331fbc168abfd028ce58a9b75963040a4ac36 100644 (file)
--- a/t/08_pkgreport.t
+++ b/t/08_pkgreport.t
@@ -25,21 +25,12 @@ use DebbugsTest qw(:all);
 
 my %config;
 eval {
-     %config = create_debbugs_configuration(debug => exists $ENV{DEBUG}?$ENV{DEBUG}:0);
+     %config = create_debbugs_configuration();
 };
 if ($@) {
      BAIL_OUT($@);
 }
 
-# Output some debugging information if there's an error
-END{
-     if ($ENV{DEBUG}) {
-         foreach my $key (keys %config) {
-              diag("$key: $config{$key}\n");
-         }
-     }
-}
-
 # create a bug
 send_message(to=>'submit@bugs.something',
             headers => [To   => 'submit@bugs.something',