changeset 114:7084af955c57

minor changes, more strict code, no bugs fixed, no features added
author wizard
date Tue, 25 May 2010 01:26:42 +0400
parents 7b14e0122b79
children 5edc2ac5231c
files Lib/IMPL/Object/Factory.pm
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/Lib/IMPL/Object/Factory.pm	Fri May 21 02:38:11 2010 +0400
+++ b/Lib/IMPL/Object/Factory.pm	Tue May 25 01:26:42 2010 +0400
@@ -15,7 +15,7 @@
 sub new {
 	my $self = shift;
 	
-	return ref $self ? $self->CreateObject(@_) : $self->SUPER::new(@_);
+	return ref $self ? $self->CreateObject(@_) : $self->IMPL::Object::new(@_);
 }
 
 sub CTOR {