diff Lib/IMPL/Class/PropertyInfo.pm @ 230:6d8092d8ce1b

*reworked IMPL::Security *reworked IMPL::Web::Security *refactoring
author sergey
date Mon, 08 Oct 2012 03:37:37 +0400
parents 431db7034a88
children 8d36073411b1
line wrap: on
line diff
--- a/Lib/IMPL/Class/PropertyInfo.pm	Sat Sep 29 02:34:47 2012 +0400
+++ b/Lib/IMPL/Class/PropertyInfo.pm	Mon Oct 08 03:37:37 2012 +0400
@@ -1,6 +1,5 @@
 package IMPL::Class::PropertyInfo;
 use strict;
-use IMPL::_core::version;
 
 use parent qw(IMPL::Class::MemberInfo);
 
@@ -31,10 +30,6 @@
         
         $implementor = $this->SelectImplementor();
         
-        if (my $class = ref $implementor ? undef : $implementor) {
-            eval "require $class; 1;" or die $@ unless $LoadedModules{$class}++;
-        }
-        
         $this->Implementor($implementor);
     }