From 3a8ee0765eac38a8ae8695957dec8382f8f4df46 Mon Sep 17 00:00:00 2001 From: Guilhem Moulin Date: Tue, 22 Sep 2015 20:16:47 +0200 Subject: wibble --- interimap | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'interimap') diff --git a/interimap b/interimap index 54ae0aa..f9bee12 100755 --- a/interimap +++ b/interimap @@ -276,7 +276,7 @@ foreach my $name (qw/local remote/) { # # Add a new mailbox to the database. -my $STH_INSERT_MAILBOX= $DBH->prepare(q{INSERT INTO mailboxes (mailbox,subscribed) VALUES (?,?)}); +my $STH_INSERT_MAILBOX = $DBH->prepare(q{INSERT INTO mailboxes (mailbox,subscribed) VALUES (?,?)}); # Get the index associated with a mailbox. my $STH_GET_INDEX = $DBH->prepare(q{SELECT idx,subscribed FROM mailboxes WHERE mailbox = ?}); -- cgit v1.2.3 From f9fdac668d82d0e651c2df09136bf61ec3c2b89a Mon Sep 17 00:00:00 2001 From: Guilhem Moulin Date: Tue, 22 Sep 2015 20:18:10 +0200 Subject: Bug fix: don't delete the lockfile if another instance of interimap is running. --- interimap | 1 + 1 file changed, 1 insertion(+) (limited to 'interimap') diff --git a/interimap b/interimap index f9bee12..401bfa2 100755 --- a/interimap +++ b/interimap @@ -130,6 +130,7 @@ $SIG{TERM} = sub { cleanup(); exit 0; }; close $lock; chomp $pid; my $msg = "LOCKFILE '$LOCKFILE' exists."; + undef $LOCKFILE; # don't delete the lockfile $msg .= " (Is PID $pid running?)" if defined $pid and $pid =~ /^[0-9]+$/; die $msg, "\n"; } -- cgit v1.2.3