columns_info_for upgrades, related test updates, related DB2 fix

[dbsrgits/DBIx-Class.git] / t / run / 11mysql.tl

diff --git a/t/run/11mysql.tl b/t/run/11mysql.tl
index a78bfec..15664d9 100644 (file)
--- a/t/run/11mysql.tl
+++ b/t/run/11mysql.tl
@@ -16,11 +16,11 @@ my $dbh = MySQLTest->schema->storage->dbh;
 
 $dbh->do("DROP TABLE IF EXISTS artist;");
 
-$dbh->do("CREATE TABLE artist (artistid INTEGER NOT NULL AUTO_INCREMENT PRIMARY KEY, name VARCHAR(255));");
+$dbh->do("CREATE TABLE artist (artistid INTEGER NOT NULL AUTO_INCREMENT PRIMARY KEY, name VARCHAR(255), charfield CHAR(10));");
 
 #'dbi:mysql:host=localhost;database=dbic_test', 'dbic_test', '');
 
-MySQLTest::Artist->load_components('PK::Auto::MySQL');
+MySQLTest::Artist->load_components('PK::Auto');
 
 # test primary key handling
 my $new = MySQLTest::Artist->create({ name => 'foo' });
@@ -43,19 +43,27 @@ is( $it->next, undef, "next past end of resultset ok" );
 
 my $test_type_info = {
     'artistid' => {
-        'data_type' => 'integer',
-        'is_nullable' => 1,
-        'size' => 10
+        'data_type' => 'INT',
+        'is_nullable' => 0,
+        'size' => 11,
+        'default_value' => undef,
     },
     'name' => {
-        'data_type' => 'varchar',
+        'data_type' => 'VARCHAR',
+        'is_nullable' => 1,
+        'size' => 255,
+        'default_value' => undef,
+    },
+    'charfield' => {
+        'data_type' => 'VARCHAR',
         'is_nullable' => 1,
-        'size' => 255
-    }
+        'size' => 10,
+        'default_value' => undef,
+    },
 };
 
 
-my $type_info = MySQLTest::Artist->storage->columns_info_for('artist');
+my $type_info = MySQLTest->schema->storage->columns_info_for('artist');
 is_deeply($type_info, $test_type_info, 'columns_info_for - column data types');