diff options
Diffstat (limited to 'mysql-test/lib/My/Test.pm')
| -rw-r--r-- | mysql-test/lib/My/Test.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/mysql-test/lib/My/Test.pm b/mysql-test/lib/My/Test.pm index 735e8db5485..2d2bac3be03 100644 --- a/mysql-test/lib/My/Test.pm +++ b/mysql-test/lib/My/Test.pm @@ -40,7 +40,7 @@ sub copy { my $copy= My::Test->new(); while (my ($key, $value) = each(%$self)) { if (ref $value eq "ARRAY") { - push(@{$copy->{$key}}, @$value); + $copy->{$key} = [ @$value ]; } else { $copy->{$key}= $value; } |