Mercurial > pub > Impl

diff Lib/IMPL/Web/RestContract.pm @ 200:a9dbe534d236

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
sync
author sergey
date Tue, 24 Apr 2012 02:34:49 +0400
parents e743a8481327
children 292226770180
line wrap: on
line diff
--- a/Lib/IMPL/Web/RestContract.pm	Mon Apr 23 01:36:52 2012 +0400
+++ b/Lib/IMPL/Web/RestContract.pm	Tue Apr 24 02:34:49 2012 +0400
@@ -30,7 +30,7 @@
 	
 	if (ref $t eq 'HASH') {
 		my $factory = $t->{factory} || TRestResource;
-		return $factory->new(%$t, target => $obj, %$props);
+		return $factory->new(%$t, target => $obj, contract => $this, %$props);
 	} elsif (ref $t eq 'CODE') {
 		return $this->$t($obj,$props);
 	} else {