diff Lib/IMPL/Object/Meta.pm @ 132:42fbb38d4a48

minor changes
author wizard
date Thu, 17 Jun 2010 17:35:36 +0400
parents 76b878ad6596
children 4267a2ac3d46
line wrap: on
line diff
--- a/Lib/IMPL/Object/Meta.pm	Wed Jun 16 17:49:12 2010 +0400
+++ b/Lib/IMPL/Object/Meta.pm	Thu Jun 17 17:35:36 2010 +0400
@@ -14,7 +14,7 @@
     my $class = shift;
     my $caller = caller;
     my $meta = $class->surrogate();
-    $meta->IMPL::Object::Meta::Container(caller);
+    $meta->IMPL::Object::Meta::Container(scalar caller);
     $meta->callCTOR(@_);
     $caller->set_meta($meta);
 }