+ my $index_path = $Conf{KinoPath} || die "no KinoPath";
+
+ my $self = bless {
+ index => $index_path,
+ first_time_indexing => ! -d $index_path,
+ }, $class;
+ warn "# ",dump($self);
+ return $self;
+}
+
+sub indexer {
+ my $self = shift;
+ return $self->{_indexer} if defined $self->{_indexer};
+