use Test::More 'no_plan';
use strict;
use warnings;
use DBIx::Custom::Query;
# Function for test name
my $test;
sub test{
$test = shift;
}
# Variables for test
my $query;
test 'Accessors';
$query = DBIx::Custom::Query->new(
sql => 'a',
columns => 'b',
filter => 'c',
sth => 'e',
fetch_filter => 'f',
);
is($query->sql, 'a', "$test : sql");
is($query->columns, 'b', "$test : columns ");
is($query->filter, 'c', "$test : filter");
is($query->sth, 'e', "$test : sth");