Mercurial > pub > Impl
diff Lib/IMPL/Config/Activator.pm @ 194:4d0e1962161c
Replaced tabs with spaces
IMPL::Web::View - fixed document model, new features (control classes, document constructor parameters)
| author | cin |
|---|---|
| date | Tue, 10 Apr 2012 20:08:29 +0400 |
| parents | d1676be8afcc |
| children | c8fe3f84feba |
line wrap: on
line diff
--- a/Lib/IMPL/Config/Activator.pm Tue Apr 10 08:13:22 2012 +0400 +++ b/Lib/IMPL/Config/Activator.pm Tue Apr 10 20:08:29 2012 +0400 @@ -5,9 +5,9 @@ use IMPL::Class::Property; BEGIN { - public property factory => prop_all; - public property parameters => prop_all; - public property object => prop_get | owner_set; + public property factory => prop_all; + public property parameters => prop_all; + public property object => prop_get | owner_set; } __PACKAGE__->PassThroughArgs; @@ -32,13 +32,13 @@ my $params = $this->parameters; if (UNIVERSAL::isa($params,'HASH')) { - while ( my ($key,$value) = each %$params ) { - push @args,$key, UNIVERSAL::isa($value,'IMPL::Config::Activator') ? $value->activate : $value; - } + while ( my ($key,$value) = each %$params ) { + push @args,$key, UNIVERSAL::isa($value,'IMPL::Config::Activator') ? $value->activate : $value; + } } elsif (UNIVERSAL::isa($params,'ARRAY')) { - push @args, map UNIVERSAL::isa($_,'IMPL::Config::Activator') ? $_->activate : $_, @$params; + push @args, map UNIVERSAL::isa($_,'IMPL::Config::Activator') ? $_->activate : $_, @$params; } else { - push @args, UNIVERSAL::isa($params,'IMPL::Config::Activator') ? $params->activate : $params; + push @args, UNIVERSAL::isa($params,'IMPL::Config::Activator') ? $params->activate : $params; } push @args, map UNIVERSAL::isa($_,'IMPL::Config::Activator') ? $_->activate : $_, @_ if @_; @@ -48,7 +48,7 @@ return $this->object($factory->new(@args)); } else { - return $this->object; + return $this->object; } }