X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FStatus.pm;h=7ca77cf5ea6c05584adfae20092c900b0bc635f2;hb=38b4c5d4ce1b058dc87a184a74ae34d8d8f78b22;hp=0d97a323b5c1adcdba61013890e15ac6c0b153c4;hpb=51ad28535bcc0bddf55b8d763bd2a07f146c961f;p=debbugs.git

diff --git a/Debbugs/Status.pm b/Debbugs/Status.pm
index 0d97a32..7ca77cf 100644
--- a/Debbugs/Status.pm
+++ b/Debbugs/Status.pm
@@ -549,11 +549,6 @@ sub new_bug {
 		  ($nn+1)."\n");
     unfilelock();
     my $nn_hash = get_hashname($nn);
-    use IO::File;
-    my $t_fh = IO::File->new("/home/don/temp.txt",'a') or die "Unable to open ~don/temp.txt for writing: $!";
-    use Data::Dumper;
-    print {$t_fh} Dumper({%param,nn => $nn, nn_hash => $nn_hash, nextnumber => qx(cat nextnumber)});
-    close $t_fh;
     if ($param{copy}) {
 	my $c_hash = get_hashname($param{copy});
 	for my $file (qw(log status summary report)) {