Mercurial > pub > Impl
changeset 281:a8dbddf491dd
refactoring
*IMPL::declare reset abstractProps static property after implementing these props
*IMPL::Serialization: fixed bug with multiple text parts inside one node
*IMPL::Web::Handler::TTView: removed obsolete property 'location' from 'view' template variable
| author | cin |
|---|---|
| date | Mon, 11 Feb 2013 00:58:22 +0400 |
| parents | c6d0f889ef87 |
| children | 68d905f8dc43 |
| files | Lib/IMPL/Serialization.pm Lib/IMPL/Web/Application/ResourceInterface.pm Lib/IMPL/Web/ForbiddenException.pm Lib/IMPL/Web/Handler/TTView.pm Lib/IMPL/declare.pm |
| diffstat | 5 files changed, 12 insertions(+), 9 deletions(-) [+] |
line wrap: on
line diff
--- a/Lib/IMPL/Serialization.pm Wed Feb 06 02:15:48 2013 +0400 +++ b/Lib/IMPL/Serialization.pm Mon Feb 11 00:58:22 2013 +0400 @@ -234,12 +234,12 @@ die Exception->new("Trying to set data for an object which not exists") if not $rhObject; - die Exception->new( - "Deserialization data already exists for a current object", - "ObjectName= $rhObject->{'Name'}" ) - if $rhObject->{'Data'}; + #die Exception->new( + # "Deserialization data already exists for a current object", + # "ObjectName= $rhObject->{'Name'}" ) + # if $rhObject->{'Data'}; - $rhObject->{'Data'} = $data; + $rhObject->{'Data'} .= $data; return 1; }
--- a/Lib/IMPL/Web/Application/ResourceInterface.pm Wed Feb 06 02:15:48 2013 +0400 +++ b/Lib/IMPL/Web/Application/ResourceInterface.pm Mon Feb 11 00:58:22 2013 +0400 @@ -11,7 +11,7 @@ } sub FetchChildResource { - die NotImplementedException->new(); + die NotImplException->new(); } 1;
--- a/Lib/IMPL/Web/ForbiddenException.pm Wed Feb 06 02:15:48 2013 +0400 +++ b/Lib/IMPL/Web/ForbiddenException.pm Mon Feb 11 00:58:22 2013 +0400 @@ -7,6 +7,10 @@ } }; +use IMPL::Resources::Strings { + message => "You don't have access to this resource" +}; + sub status { "403 Forbidden" }
--- a/Lib/IMPL/Web/Handler/TTView.pm Wed Feb 06 02:15:48 2013 +0400 +++ b/Lib/IMPL/Web/Handler/TTView.pm Mon Feb 11 00:58:22 2013 +0400 @@ -48,8 +48,6 @@ $view = ViewResult->new(model => $model); } - $view->location($action->context->{resourceLocation}) unless $view->location; - my $vars = { view => $view, model => $model,
--- a/Lib/IMPL/declare.pm Wed Feb 06 02:15:48 2013 +0400 +++ b/Lib/IMPL/declare.pm Mon Feb 11 00:58:22 2013 +0400 @@ -98,7 +98,8 @@ } if ($args->{_implement}) { - $self->_implementProps($caller->abstractProps,$caller); + $self->_implementProps($caller->abstractProps,$caller); + $caller->abstractProps([]); } $IMPL::require::level--;