Mercurial > pub > Impl

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

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
minor changes
author wizard
date Thu, 17 Jun 2010 17:35:36 +0400
parents 76b878ad6596
children 4267a2ac3d46
comparison
equal deleted inserted replaced
131:3df87ee58bee 132:42fbb38d4a48
12 12
13 sub meta { 13 sub meta {
14 my $class = shift; 14 my $class = shift;
15 my $caller = caller; 15 my $caller = caller;
16 my $meta = $class->surrogate(); 16 my $meta = $class->surrogate();
17 $meta->IMPL::Object::Meta::Container(caller); 17 $meta->IMPL::Object::Meta::Container(scalar caller);
18 $meta->callCTOR(@_); 18 $meta->callCTOR(@_);
19 $caller->set_meta($meta); 19 $caller->set_meta($meta);
20 } 20 }
21 21
22 1; 22 1;