From: Don Armstrong Date: Tue, 4 Jul 2017 03:52:04 +0000 (-0700) Subject: fix the spam lockfile name X-Git-Tag: release/2.6.0~104 X-Git-Url: https://git.donarmstrong.com/?p=debbugs.git;a=commitdiff_plain;h=67588ea921cdcb03fd303e612b45588938f00d4a fix the spam lockfile name --- diff --git a/Debbugs/Log/Spam.pm b/Debbugs/Log/Spam.pm index df2d5e0..ab0bc7c 100644 --- a/Debbugs/Log/Spam.pm +++ b/Debbugs/Log/Spam.pm @@ -136,7 +136,7 @@ Saves changes to the bug log spam file. sub save { my $self = shift; return unless keys %{$self->{spam}}; - filelock($self->{name}); + filelock($self->{name}.'.lock'); open(my $fh,'>',$self->{name}.'.tmp') or croak "Unable to open bug log spam '$self->{name}.tmp' for writing: $!"; binmode($fh,':encoding(UTF-8)');