unlock nextnumber after overwriting

diff --git a/Debbugs/Status.pm b/Debbugs/Status.pm
index e70643fbe6244f86c799b9149e4fc44e51a653bf..0d97a323b5c1adcdba61013890e15ac6c0b153c4 100644 (file)
--- a/Debbugs/Status.pm
+++ b/Debbugs/Status.pm
@@ -547,6 +547,7 @@ sub new_bug {
     close $nn_fh;
     overwritefile("nextnumber",
                  ($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: $!";