DFV model mostly working with Postgres

git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@531 48953598-375a-da11-a14b-00016c27c3ee

diff --git a/lib/Maypole/Model/CDBI/DFV.pm b/lib/Maypole/Model/CDBI/DFV.pm
index 61ab5a62a3f8c09f9c5e021b4752e970b011082f..a6b12b3dfff8379a6cb0aebf693cc338ec1410cd 100644 (file)
--- a/lib/Maypole/Model/CDBI/DFV.pm
+++ b/lib/Maypole/Model/CDBI/DFV.pm
@@ -305,7 +305,7 @@ sub _column_info {
 
   # update with required columns from DFV Profile
   my $profile = $class->dfv_profile;
-  $class->required_columns(@{$profile->{required}});
+  $class->required_columns($profile->{required});
 
   return $class->COLUMN_INFO;
 }