diff Lib/IMPL/Class/Meta.pm @ 111:6c25ea91c985

ControllerUnit concept
author wizard
date Tue, 18 May 2010 01:33:37 +0400
parents dc1da0389db7
children 44977efed303
line wrap: on
line diff
--- a/Lib/IMPL/Class/Meta.pm	Mon May 17 17:42:27 2010 +0400
+++ b/Lib/IMPL/Class/Meta.pm	Tue May 18 01:33:37 2010 +0400
@@ -200,7 +200,7 @@
 sub say_version {
 	my ($self) = @_;
 	
-	print $self->class_data(info)->{version};
+	print $self->class_data('info')->{version};
 }
 
 package Bar;