From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Wed, 8 Dec 2010 21:33:12 +0000 (+0100)
Subject: implement delete
X-Git-Url: http://git.rot13.org/?p=angular-mojolicious.git;a=commitdiff_plain;h=e05cae6cdb7a0c9a792a2d9b2e688e62748bfbb3

implement delete
---

diff --git a/trigger/KinoSearch.pm b/trigger/KinoSearch.pm
index 1d5f832..01b854c 100644
--- a/trigger/KinoSearch.pm
+++ b/trigger/KinoSearch.pm
@@ -54,6 +54,13 @@ sub flatten {
 sub filter {
 	my $change = shift;
 	my $doc = $change->{doc} || next;
+
+	if ( $doc->{_deleted} ) {
+		warn "# filter DELETE\n";
+		_indexer->delete_by_term( field => '_id', term => $doc->{_id} );
+		return 0;
+	}
+
 	my $flat;
 	flatten( \$flat, $doc, '' );
 	foreach my $field ( keys %$flat ) {