remove debbuging Data::Printer code which snuck in

[debbugs.git] / t / fake_ftpdist

diff --git a/t/fake_ftpdist b/t/fake_ftpdist
index a388aadac65afa6745fd11029d90d4834340db5a..792041c9ec3005454be1989a2e6bec5c0e81444d 100755 (executable)
--- a/t/fake_ftpdist
+++ b/t/fake_ftpdist
@@ -112,8 +112,6 @@ for my $suite (keys %s_p) {
        }
 }
 $prog_bar->target($tot) if $prog_bar;
-use Data::Printer;
-p %s_di;
 my $i = 0;
 my $avg_pkgs = 0;
 my $tot_suites = scalar keys %s_p;