fix multiple DEFAULT NULLs
authorRafael Kitover <rkitover@cpan.org>
Tue, 6 Sep 2011 08:16:11 +0000 (04:16 -0400)
committerRafael Kitover <rkitover@cpan.org>
Tue, 6 Sep 2011 08:16:11 +0000 (04:16 -0400)
commit87a43db11142bab84c1ddc7c2ab7a8e08437a63a
tree992bf192f497981daea95b647ea6dc225c20e0dc
parentc99b3e2b33149b6b6c8db5735f263667f9d0f947
fix multiple DEFAULT NULLs

    $info->{default_value} = \'null'

is unsafe because Data::Dump optimizes
refs to constants, so we must make sure to use:

    my $null = 'null';
    $info->{default_value} = \$null;

for all scalar refs in the dump.
lib/DBIx/Class/Schema/Loader/DBI/Component/QuotedDefault.pm
t/10_03pg_common.t