From ecf081dd43f887e5a7458601f636ae9e5e8c5832 Mon Sep 17 00:00:00 2001 From: zby Date: Fri, 30 Jan 2009 16:18:33 +0000 Subject: [PATCH] code for resolving --- lib/DBIx/Class/ResultSet/RecursiveUpdate.pm | 4 ++++ t/var/dvdzbr.db | Bin 30720 -> 30720 bytes 2 files changed, 4 insertions(+) diff --git a/lib/DBIx/Class/ResultSet/RecursiveUpdate.pm b/lib/DBIx/Class/ResultSet/RecursiveUpdate.pm index 50be123..95725d0 100644 --- a/lib/DBIx/Class/ResultSet/RecursiveUpdate.pm +++ b/lib/DBIx/Class/ResultSet/RecursiveUpdate.pm @@ -47,6 +47,10 @@ sub recursive_update { _master_relation_cond( $object, $info->{cond}, $self->_get_pk_for_related( $name ) ) ){ my $related_result = $object->related_resultset( $name ); + my $resolved = $self->result_source->resolve_condition( + $info->{cond}, $name, $object + ); +# warn 'resolved: ' . Dumper( $resolved ); use Data::Dumper; my $sub_object = $related_result->recursive_update( $updates->{$name} ); $object->set_from_related( $name, $sub_object ); } diff --git a/t/var/dvdzbr.db b/t/var/dvdzbr.db index ffd99d843cf9400d2ac21d617e4f275866891db2..bd53857e33867ad8c6daf7167d052a7d77f57d9d 100644 GIT binary patch delta 254 zcmZqpz}WDCae|akz7+!sFul1^=NL2Jc{iXa&v^$R$#vdx6AOt-gI(;nm5yVv&n1K{Fu(0PyVY`#dh9;P265`@_Rpt$y3z@n9f^nUalU+%5>gp zGP7wgkTNm00hdU7gUP4APA_XAL)RaO81 -- 2.45.2