package tests::helpers::TestExtendedAnalyzer;

use base qw/ Lire::DlfCategoriser/;

use File::Basename;

sub new {
    return bless {}, shift;
}

sub name {
    return "extended";
}

sub title {
    return 'TestExtendedAnalyzer';
}

sub description {
    return '<para>A test analyser.</para>';
}

sub src_schema {
    return "test";
}

sub dst_schema {
    return "test-extended";
}

sub initialise {
    my ( $self, $config ) = @_;

    return;
}

sub categorise {
    my ( $self, $dlf ) = @_;

    $dlf->{'dirname'} = dirname( $dlf->{'file'} )
      if defined $dlf->{'file'};

    return;
}

1;