diff options
Diffstat (limited to 'mysql-test/lib/My/Test.pm')
| -rw-r--r-- | mysql-test/lib/My/Test.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/mysql-test/lib/My/Test.pm b/mysql-test/lib/My/Test.pm index 5b202ea17a1..04dccfdaa4a 100644 --- a/mysql-test/lib/My/Test.pm +++ b/mysql-test/lib/My/Test.pm @@ -97,7 +97,8 @@ sub read_test { chomp($serialized); $serialized =~ s/\\([0-9a-fA-F]{2})/chr(hex($1))/eg; my $test= Storable::thaw($serialized); - die "wrong class (hack attempt?): ".ref($test) + use Data::Dumper; + die "wrong class (hack attempt?): ".ref($test)."\n".Dumper(\$test) unless ref($test) eq 'My::Test'; resfile_from_test($test) if $::opt_resfile; return $test; |