4 use Test::More tests => 3;
6 use_ok('SQL::Abstract') or BAIL_OUT( "$@" );
8 is SQL::Abstract->generate( [ -name => qw/me id/]), "me.id",
9 "Simple name generator";
11 is SQL::Abstract->generate(
13 [ -name => qw/me id/],
14 [ -name => qw/me foo bar/],
17 ), "me.id, me.foo.bar, bar",