}
}
$sample=~s/\n/ /g;
+ # Decode html entities in the sample since omega encodes them.
+ eval q{use HTML::Entities};
+ $sample=decode_entities($sample);
# data used by omega
$doc->set_data(
sub delete (@) { #{{{
my $db=xapiandb();
foreach my $page (@_) {
- $db->delete_document_by_term(pageterm($page));
+ $db->delete_document_by_term(pageterm(pagename($page)));
}
} #}}}