File Coverage

blib/lib/Geoffrey/Role/ConverterType.pm

Criterion	Covered	Total	%
statement	24	24	100.0
branch			n/a
condition			n/a
subroutine	12	12	100.0
pod	7	7	100.0
total	43	43	100.0

package Geoffrey::Role::ConverterType;

use utf8;
use strict;
use warnings;
use Perl::Version;
use Geoffrey::Exception::NotSupportedException;

$Geoffrey::Role::Converter::VERSION = '0.000204';

sub new {
    my $class = shift;
    my $self  = {@_};
    return bless $self, $class;
}

sub add {
    return Geoffrey::Exception::NotSupportedException::throw_converter_type( 'add', shift );
}

sub alter {
    return Geoffrey::Exception::NotSupportedException::throw_converter_type( 'alter', shift );
}

sub append {
    return Geoffrey::Exception::NotSupportedException::throw_converter_type( 'append', shift );
}

sub drop {
    return Geoffrey::Exception::NotSupportedException::throw_converter_type( 'drop', shift );
}

sub list {
    return Geoffrey::Exception::NotSupportedException::throw_converter_type( 'list', shift );
}

sub information {
    return Geoffrey::Exception::NotSupportedException::throw_converter_type( 'information',
        shift );
}
1;    # End of Geoffrey::Role::ConverterType

__END__