--- pandia/blacklist 2025/06/28 00:33:32 1.2 +++ pandia/blacklist 2025/06/30 02:18:44 1.3 @@ -1,7 +1,7 @@ #!/usr/bin/env perl # -# $Id: blacklist,v 1.2 2025/06/28 00:33:32 snw Exp $ +# $Id: blacklist,v 1.3 2025/06/30 02:18:44 snw Exp $ # Copyright (C) 2025 Coherent Logic Development LLC # # Author: Serena Willis @@ -9,6 +9,9 @@ # Licensed AGPL-3.0 # # $Log: blacklist,v $ +# Revision 1.3 2025/06/30 02:18:44 snw +# Updates +# # Revision 1.2 2025/06/28 00:33:32 snw # Update locking # @@ -50,3 +53,9 @@ my $sth = $dbh->prepare("DELETE crawl_qu $sth->execute(); print "[OK]\n"; +print "pandia: removing blacklisted items from index..."; +$sth = $dbh->prepare("DELETE url_fulltext FROM url_fulltext JOIN blacklist ON url_fulltext.url_domain=blacklist.url_domain"); +$sth->execute(); +print "[OK]\n"; + +