From 67588ea921cdcb03fd303e612b45588938f00d4a Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Mon, 3 Jul 2017 20:52:04 -0700 Subject: [PATCH] fix the spam lockfile name --- Debbugs/Log/Spam.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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)'); -- 2.39.2