From:	spadkins@cvs.perl.org	Date:	Tue Aug  5 13:21:44 2008
Subject:	[svn:p5ee] r11628 - p5ee/trunk/App-Repository/lib/App/Repository

Author: spadkins
Date: Tue Aug  5 12:21:43 2008
New Revision: 11628

Modified:
   p5ee/trunk/App-Repository/lib/App/Repository/DBI.pm

Log:
Added params to substitute for where_condition

Modified: p5ee/trunk/App-Repository/lib/App/Repository/DBI.pm
==============================================================================
--- p5ee/trunk/App-Repository/lib/App/Repository/DBI.pm	(original)
+++ p5ee/trunk/App-Repository/lib/App/Repository/DBI.pm	Tue Aug  5 12:21:43 2008
@@ -1584,7 +1584,7 @@
             $tableref = ($dbtable) ? "$dbtable $tablealias" : $tablealias;
             $where_condition = $tablealiashref->{$tablealias}{joincriteria};
             if ($where_condition =~ /\{.*\}/) {
-                $where_condition = $self->substitute($where_condition);
+                $where_condition = $self->substitute($where_condition, $params);
             }
             if ($tablealiashref->{$tablealias}{cardinality_zero}) {
                 push(@outer_join_clauses, "left join $tableref on $where_condition") if ($where_condition);