view Lib/IMPL/Web/Application/ViewResult.pm @ 213:d6e2ea24af08

sync
author sergey
date Fri, 03 Aug 2012 01:15:15 +0400
parents
children 4683002758aa
line wrap: on
line source

package IMPL::Web::Application::ViewResult;
use strict;

use IMPL::lang qw(:declare);
use IMPL::declare {
	base => [
	   'IMPL::Web::Application::ActionResult' => '@_'
	]
};

BEGIN {
	public property model => PROP_ALL;
	public property type => PROP_ALL;
}

sub CTOR {
	my $this = shift;
	$this->status('200 OK') unless $this->status;
}


1;