Mercurial > pub > Impl
comparison Lib/IMPL/Web/Application/ResourceContract.pm @ 331:2ff1726c066c
removed operation contract (due it's useless)
| author | cin |
|---|---|
| date | Wed, 05 Jun 2013 18:21:11 +0400 |
| parents | fe725fad2d90 |
| children | 04a093f0a5a6 |
comparison
equal
deleted
inserted
replaced
| 330:fe725fad2d90 | 331:2ff1726c066c |
|---|---|
| 42 | 42 |
| 43 my %nameMap; | 43 my %nameMap; |
| 44 | 44 |
| 45 foreach my $res (@$resources) { | 45 foreach my $res (@$resources) { |
| 46 if (ref $res->{contract} eq 'HASH') { | 46 if (ref $res->{contract} eq 'HASH') { |
| 47 $res->{contract} = __PACKAGE__->new(%{$res->{contract}}); | 47 # custom contract will add OPTIONS verb if needed |
| 48 $res->{contract} = CustomContract->new(%{$res->{contract}}); | |
| 48 } | 49 } |
| 49 | 50 |
| 50 next unless $res->{contract}; | 51 next unless $res->{contract}; |
| 51 | 52 |
| 52 if ( my $name = $res->{name} ) { | 53 if ( my $name = $res->{name} ) { |