27 |
my $coll = Grep::Model::ItemCollection->new( results_are_readable => 1, current_user => $system_user ); |
my $coll = Grep::Model::ItemCollection->new( results_are_readable => 1, current_user => $system_user ); |
28 |
$coll->unlimit; |
$coll->unlimit; |
29 |
|
|
30 |
print "indexing ", $coll->count, " items ", $keep_duplicates ? "" : "removing duplicates "; |
Jifty->log->info( "indexing ", $coll->count, " items ", $keep_duplicates ? "" : "removing duplicates " ); |
31 |
|
|
32 |
my $search = Grep::Search->new({ create => 1 }); |
my $search = Grep::Search->new({ create => 1 }); |
33 |
my $deduper = Text::DeDuper->new(); |
my $deduper = Text::DeDuper->new(); |
53 |
print " -$id-"; |
print " -$id-"; |
54 |
$si->delete; |
$si->delete; |
55 |
$duplicates++; |
$duplicates++; |
56 |
|
$search->invindexer->delete_by_term( 'id', $id ); |
57 |
} |
} |
58 |
} |
} |
59 |
|
|
65 |
$total++; |
$total++; |
66 |
} |
} |
67 |
|
|
68 |
print "$total records indexed", $duplicates ? "($duplicates duplicates)" : "", "\n"; |
Jifty->log->info( "$total records indexed", $duplicates ? " ($duplicates duplicates)" : "" ); |
69 |
|
|
70 |
$search->finish; |
$search->finish; |