Mercurial > pub > Impl

diff Lib/IMPL/Class/Meta.pm @ 263:0f59b2de72af

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*fixed IMPL::DOM::Schema circular module references *modified IMPL::Object::Singleton, added auto-activation *code cleanups, docs
author sergey
date Wed, 09 Jan 2013 05:17:44 +0400
parents 6d8092d8ce1b
children af8af4b8337e
line wrap: on
line diff
--- a/Lib/IMPL/Class/Meta.pm	Sat Dec 29 03:22:15 2012 +0400
+++ b/Lib/IMPL/Class/Meta.pm	Wed Jan 09 05:17:44 2013 +0400
@@ -134,6 +134,7 @@
     
     *{"${class}::$name"} = sub {
         my $self = shift;
+        $self = ref $self || $self;
         
         if ($class ne $self) {
             if (@_ > 0) {