[dbsrgits/SQL-Translator.git] / lib / SQL / Translator / Generator / DDL / PostgreSQL.pm

package SQL::Translator::Generator::DDL::PostgreSQL;

=head1 NAME

SQL::Translator::Generator::DDL::PostgreSQL - A Moo based PostgreSQL DDL generation
engine.

=head1 DESCRIPTION

I<documentation volunteers needed>

=cut
use Moo;

has quote_chars => (
  is => 'rw',
  default => sub { +[qw(" ")] },
  trigger => sub { $_[0]->clear_escape_char },
);

with 'SQL::Translator::Generator::Role::Quote';

sub name_sep { q(.) }

1;

=head1 AUTHORS

See the included AUTHORS file:
L<http://search.cpan.org/dist/SQL-Translator/AUTHORS>

=head1 COPYRIGHT

Copyright (c) 2012 the SQL::Translator L</AUTHORS> as listed above.

=head1 LICENSE

This code is free software and may be distributed under the same terms as Perl
itself.

=cut
Commit	Line	Data
2230ed2a	1	package SQL::Translator::Generator::DDL::PostgreSQL;
	2
	3	=head1 NAME
	4
	5	SQL::Translator::Generator::DDL::PostgreSQL - A Moo based PostgreSQL DDL generation
	6	engine.
	7
	8	=head1 DESCRIPTION
	9
	10	I<documentation volunteers needed>
	11
	12	=cut
	13	use Moo;
	14
0c425150	15	has quote_chars => (
	16	is => 'rw',
	17	default => sub { +[qw(" ")] },
	18	trigger => sub { $_[0]->clear_escape_char },
	19	);
2230ed2a	20
	21	with 'SQL::Translator::Generator::Role::Quote';
	22
	23	sub name_sep { q(.) }
	24
	25	1;
	26
	27	=head1 AUTHORS
	28
	29	See the included AUTHORS file:
	30	L<http://search.cpan.org/dist/SQL-Translator/AUTHORS>
	31
	32	=head1 COPYRIGHT
	33
	34	Copyright (c) 2012 the SQL::Translator L</AUTHORS> as listed above.
	35
	36	=head1 LICENSE
	37
	38	This code is free software and may be distributed under the same terms as Perl
	39	itself.
	40
	41	=cut