--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Lib/IMPL/Web/Application/ViewResult.pm	Fri Aug 03 01:15:15 2012 +0400
@@ -0,0 +1,22 @@
+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;
\ No newline at end of file