removed C3 and no longer require it

[maypole.git] / lib / Maypole / Model / CDBI / DFV.pm

diff --git a/lib/Maypole/Model/CDBI/DFV.pm b/lib/Maypole/Model/CDBI/DFV.pm
index 7848759d610a72bc97711b175af01bd196d41704..5aa0e9ab85cc37aa592800a620449a3c0ff73c16 100644 (file)
--- a/lib/Maypole/Model/CDBI/DFV.pm
+++ b/lib/Maypole/Model/CDBI/DFV.pm
@@ -35,7 +35,6 @@ of CGI::Untaint. For teh win!!
 
 =cut
 
-use Class::C3;
 use Data::FormValidator;
 use Data::Dumper;
 
@@ -181,8 +180,16 @@ sub _do_update {
 
 
   my $this_class_params = {};
+
+
+  # NG changes start here.
+  # Code below fails to handle multi col PKs
+  my @pks = $class->columns('Primary');
+
   foreach my $param ( $class->columns ) {
-    next if ($param eq $class->columns('Primary'));
+    # next if ($param eq $class->columns('Primary'));
+    next if grep {/^${param}$/} @pks;
+
     my $value = $r->params->{$param};
     next unless (defined $value);
     $this_class_params->{$param} = ( $value eq '' ) ?  undef : $value;