parent
9c4ea41872
commit
613a9625ae
@ -0,0 +1,76 @@
|
|||||||
|
diff -up DBIx-Class-0.082842/t/60core.t.sqlite DBIx-Class-0.082842/t/60core.t
|
||||||
|
--- DBIx-Class-0.082842/t/60core.t.sqlite 2022-03-30 10:49:17.774464160 +0200
|
||||||
|
+++ DBIx-Class-0.082842/t/60core.t 2022-03-30 10:55:57.400750864 +0200
|
||||||
|
@@ -3,6 +3,7 @@ use warnings;
|
||||||
|
|
||||||
|
use Test::More;
|
||||||
|
use Test::Exception;
|
||||||
|
+use Test::Deep;
|
||||||
|
use Test::Warn;
|
||||||
|
use lib qw(t/lib);
|
||||||
|
use DBICTest ':DiffSQL';
|
||||||
|
@@ -387,7 +388,7 @@ lives_ok (sub { my $newlink = $newbook->
|
||||||
|
$schema->source("Artist")->column_info_from_storage(1);
|
||||||
|
$schema->source("Artist")->{_columns_info_loaded} = 0;
|
||||||
|
|
||||||
|
- is_deeply (
|
||||||
|
+ cmp_deeply (
|
||||||
|
$schema->source('Artist')->columns_info,
|
||||||
|
{
|
||||||
|
artistid => {
|
||||||
|
@@ -410,7 +411,7 @@ lives_ok (sub { my $newlink = $newbook->
|
||||||
|
size => 100
|
||||||
|
},
|
||||||
|
rank => {
|
||||||
|
- data_type => "integer",
|
||||||
|
+ data_type => re(qr/^integer$/i),
|
||||||
|
default_value => 13,
|
||||||
|
is_nullable => 0,
|
||||||
|
size => undef
|
||||||
|
@@ -421,7 +422,7 @@ lives_ok (sub { my $newlink = $newbook->
|
||||||
|
|
||||||
|
ok($schema->source("Artist")->{_columns_info_loaded} == 1, 'Columns info loaded flag set');
|
||||||
|
|
||||||
|
- is_deeply (
|
||||||
|
+ cmp_deeply (
|
||||||
|
$schema->source('Artist')->columns_info([qw/artistid rank/]),
|
||||||
|
{
|
||||||
|
artistid => {
|
||||||
|
@@ -431,7 +432,7 @@ lives_ok (sub { my $newlink = $newbook->
|
||||||
|
size => undef
|
||||||
|
},
|
||||||
|
rank => {
|
||||||
|
- data_type => "integer",
|
||||||
|
+ data_type => re(qr/^integer$/i),
|
||||||
|
default_value => 13,
|
||||||
|
is_nullable => 0,
|
||||||
|
size => undef
|
||||||
|
diff -up DBIx-Class-0.082842/t/64db.t.sqlite DBIx-Class-0.082842/t/64db.t
|
||||||
|
--- DBIx-Class-0.082842/t/64db.t.sqlite 2022-03-30 10:56:26.658928674 +0200
|
||||||
|
+++ DBIx-Class-0.082842/t/64db.t 2022-03-30 10:57:52.709451624 +0200
|
||||||
|
@@ -2,6 +2,7 @@ use strict;
|
||||||
|
use warnings;
|
||||||
|
|
||||||
|
use Test::More;
|
||||||
|
+use Test::Deep;
|
||||||
|
use lib qw(t/lib);
|
||||||
|
use DBICTest;
|
||||||
|
|
||||||
|
@@ -48,7 +49,7 @@ is_deeply (
|
||||||
|
);
|
||||||
|
|
||||||
|
{
|
||||||
|
- is_deeply (
|
||||||
|
+ cmp_deeply (
|
||||||
|
get_storage_column_info ($schema->storage, 'artist', qw/size/),
|
||||||
|
{
|
||||||
|
'artistid' => {
|
||||||
|
@@ -60,7 +61,7 @@ is_deeply (
|
||||||
|
'is_nullable' => 1,
|
||||||
|
},
|
||||||
|
'rank' => {
|
||||||
|
- 'data_type' => 'integer',
|
||||||
|
+ 'data_type' => re(qr/^integer$/i),
|
||||||
|
'is_nullable' => 0,
|
||||||
|
'default_value' => '13',
|
||||||
|
},
|
Loading…
Reference in new issue