Commit | Line | Data |
cc73c25e |
1 | package SQL::Translator::Parser::DBI::PostgreSQL; |
abb2c327 |
2 | use namespace::autoclean; |
684763c1 |
3 | use Moose::Role; |
4 | use MooseX::Types::Moose qw(Str); |
b8657f04 |
5 | |
abb2c327 |
6 | has '+schema_name' => ( |
684763c1 |
7 | isa => Str, |
8 | required => 1, |
9 | lazy => 1, |
10 | default => 'public' |
11 | ); |
12 | |
684763c1 |
13 | sub _get_view_sql { |
14 | my $self = shift; |
15 | my $view = shift; |
16 | |
17 | my ($sql) = $self->dbh->selectrow_array("SELECT pg_get_viewdef('$view'::regclass)"); |
18 | return $sql; |
19 | } |
cc73c25e |
20 | |
21 | 1; |