SQLite DDL parser test & data
[dbsrgits/SQL-Translator-2.0-ish.git] / lib / SQL / Translator / Parser / DBI.pm
index 4ecf21a..42550d0 100644 (file)
@@ -53,16 +53,16 @@ role SQL::Translator::Parser::DBI {
 
     method _is_auto_increment(HashRef $column_info) { 0 }
 
-    method _column_default_value(HashRef $column_info) { return $column_info->{COLUMN_DEF}; }
+    method _column_default_value(HashRef $column_info) { $column_info->{COLUMN_DEF} }
 
-    method _column_data_type(HashRef $column_info) { return $column_info->{DATA_TYPE}; }
+    method _column_data_type(HashRef $column_info) { $column_info->{DATA_TYPE} }
 
     method _add_tables(Schema $schema) {
         my $sth = $self->dbh->table_info($self->catalog_name, $self->schema_name, '%', "TABLE,VIEW,'LOCAL TEMPORARY','GLOBAL TEMPORARY'");
         while (my $table_info = $sth->fetchrow_hashref) {
             if ($table_info->{TABLE_TYPE} =~ /^(TABLE|LOCAL TEMPORARY|GLOBAL TEMPORARY)$/) {
                 my $temp = $table_info->{TABLE_TYPE} =~ /TEMPORARY$/ ? 1 : 0;
-                my $table = SQL::Translator::Object::Table->new({ name => $table_info->{TABLE_NAME}, temporary => $temp });
+                my $table = SQL::Translator::Object::Table->new({ name => $table_info->{TABLE_NAME}, temporary => $temp, schema => $schema });
                 $schema->add_table($table);
 
                 $self->_add_columns($table);