Mercurial > pub > Impl
diff lib/IMPL/Code/Loader.pm @ 411:ee36115f6a34 ref20150831
sync
| author | cin | 
|---|---|
| date | Mon, 21 Sep 2015 00:53:10 +0300 | 
| parents | c6e90e02dd17 | 
| children | 
line wrap: on
 line diff
--- a/lib/IMPL/Code/Loader.pm Mon Sep 14 01:11:53 2015 +0300 +++ b/lib/IMPL/Code/Loader.pm Mon Sep 21 00:53:10 2015 +0300 @@ -11,7 +11,6 @@ }, base => { 'IMPL::Object' => undef, - 'IMPL::Object::Autofill' => '@_' }, props => [ verifyNames => PROP_RO, @@ -31,7 +30,11 @@ } sub CTOR { - my ($this) = @_; + my ($this, %params) = @_; + + $this->verifyNames($params{verifyNames}) if $params{verifyNames}; + $this->prefix($params{prefix}) if $params{prefix}; + $this->_pending({}); }
