--- pandia/indexer 2025/06/27 16:20:30 1.3 +++ pandia/indexer 2025/06/28 00:33:32 1.4 @@ -1,7 +1,7 @@ #!/usr/bin/env perl # -# $Id: indexer,v 1.3 2025/06/27 16:20:30 snw Exp $ +# $Id: indexer,v 1.4 2025/06/28 00:33:32 snw Exp $ # Copyright (C) 2025 Coherent Logic Development LLC # # Author: Serena Willis @@ -9,6 +9,9 @@ # Licensed AGPL-3.0 # # $Log: indexer,v $ +# Revision 1.4 2025/06/28 00:33:32 snw +# Update locking +# # Revision 1.3 2025/06/27 16:20:30 snw # Add blacklist # @@ -37,7 +40,7 @@ $| = 1; print "pandia indexer v0.0.1\n"; print " Copyright (C) 2025 Coherent Logic Development LLC\n\n"; -open my $file, ">", "pandia_indexer.lock" or die $!; +open my $file, ">", "/tmp/pandia_indexer.lock" or die $!; flock $file, LOCK_EX|LOCK_NB or die "Unable to lock file $!"; GetOptions("dbhost=s" => \$dbhost,