diff Lib/IMPL/Web/Handler/ErrorHandler.pm @ 233:3cebcf6fdb9b

refactoring, cleaning code
author sergey
date Thu, 11 Oct 2012 04:53:08 +0400
parents 6d8092d8ce1b
children 32aceba4ee6d
line wrap: on
line diff
--- a/Lib/IMPL/Web/Handler/ErrorHandler.pm	Tue Oct 09 20:12:47 2012 +0400
+++ b/Lib/IMPL/Web/Handler/ErrorHandler.pm	Thu Oct 11 04:53:08 2012 +0400
@@ -1,7 +1,7 @@
 package IMPL::Web::Handler::ErrorHandler;
 use strict;
 
-use IMPL::lang qw(:declare :constants is);
+use IMPL::Const qw(:prop);
 use IMPL::Exception();
 use IMPL::declare {
 	require => {
@@ -14,16 +14,15 @@
 		'IMPL::Object' => undef,
 		'IMPL::Object::Autofill' => '@_',
 		'IMPL::Object::Serializable' => undef
-	}
+	},
+	props => [
+        errors => PROP_RW,
+        loader => PROP_RW,
+        fallback => PROP_RW,
+        contentType => PROP_RW
+	]
 };
 
-BEGIN {
-	public property errors => PROP_ALL;
-	public property loader => PROP_ALL;
-	public property fallback => PROP_ALL;
-	public property contentType => PROP_ALL;
-}
-
 sub CTOR {
 	my ($this) = @_;