diff Lib/IMPL/Class/Property/Accessor.pm @ 275:6253872024a4

*refactoring IMPL::Class
author cin
date Thu, 31 Jan 2013 02:18:31 +0400
parents 4d0e1962161c
children
line wrap: on
line diff
--- a/Lib/IMPL/Class/Property/Accessor.pm	Wed Jan 30 03:30:28 2013 +0400
+++ b/Lib/IMPL/Class/Property/Accessor.pm	Thu Jan 31 02:18:31 2013 +0400
@@ -9,7 +9,7 @@
 sub RemapFactoryParams {
     my ($self,$propInfo) = @_;
     
-    return $self->SUPER::RemapFactoryParams($propInfo),$propInfo->Name;
+    return $self->SUPER::RemapFactoryParams($propInfo),$propInfo->name;
 }
 
 sub GenerateGet {