use MooseX::Declare;
-role SQL::Translator::Producer::SQL::PostgreSQL {
+role SQL::Translator::Producer::SQL::PostgreSQL {
use SQL::Translator::Constants qw(:sqlt_types :sqlt_constants);
use SQL::Translator::Types qw(Column Constraint Index Table View);
my ( %index_name );
my $add_drop_view = $options->{add_drop_view};
my $view_name = $view->name;
-# debug("PKG: Looking at view '${view_name}'\n");
my $create = '';
$create .= "--\n-- View: ${qt}${view_name}${qt}\n--\n"
# Default value
#
my $default = $field->default_value;
-=cut
- if ( defined $default ) {
- SQL::Translator::Producer->_apply_default_value(
- \$field_def,
- $default,
- [
- 'NULL' => \'NULL',
- 'now()' => 'now()',
- 'CURRENT_TIMESTAMP' => 'CURRENT_TIMESTAMP',
- ],
- );
- }
-=cut
+ $field_def .= $self->_default_value($default, [ 'NULL'=> \'NULL', 'now()' => 'now()', 'CURRENT_TIMESTAMP' => 'CURRENT_TIMESTAMP', ] ) if defined $default;
#
# Not null constraint
$def .= ' MATCH ' . ( $c->match_type =~ /full/i ) ? 'FULL' : 'PARTIAL';
}
-=cut
- if ( $c->on_delete ) {
- $def .= ' ON DELETE '.join( ' ', $c->on_delete );
- }
+# if ( $c->on_delete ) {
+# $def .= ' ON DELETE '.join( ' ', $c->on_delete );
+# }
+
+# if ( $c->on_update ) {
+# $def .= ' ON UPDATE '.join( ' ', $c->on_update );
+# }
- if ( $c->on_update ) {
- $def .= ' ON UPDATE '.join( ' ', $c->on_update );
- }
-=cut
if ( $c->deferrable ) {
$def .= ' DEFERRABLE';
}