view release on metacpan or  search on metacpan

lib/Kwiki/Search/Spotlight.pm  view on Meta::CPAN

package Kwiki::Search::Spotlight;
use Kwiki::Search -Base;
our $VERSION = '0.01';

sub register {
    super;
    my $reg = shift;
    $reg->add(hook => 'page:store', post => 'update_index');
}

sub update_index {
    my $search = $self->hub->search;
    my $page_name = $self->id;
    my $dir = $search->plugin_directory;
    io($dir)->mkpath;
    system "/bin/cp database/${page_name} ${dir}/${page_name}.txt";
}

sub perform_search {
    my $search = $self->cgi->search_term;
    my $dir = io($self->plugin_directory)->absolute;