Mercurial > pub > Impl

comparison Lib/IMPL/require.pm @ 238:b8c724f6de36

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
DOM model refactoring TT view refactoring, controls are no longer derived from DOM nodes bugfixes
author sergey
date Tue, 16 Oct 2012 01:33:06 +0400
parents 6d8092d8ce1b
children 9f394b27dccf
comparison
equal deleted inserted replaced
237:61db68166c37 238:b8c724f6de36
13 my $caller = caller; 13 my $caller = caller;
14 14
15 no strict 'refs'; 15 no strict 'refs';
16 16
17 while( my ($alias, $class) = each %$aliases ) { 17 while( my ($alias, $class) = each %$aliases ) {
18 _require($class); 18 $class = _require($class);
19 19
20 *{"${caller}::$alias"} = set_prototype(sub { 20 *{"${caller}::$alias"} = set_prototype(sub {
21 $class 21 $class
22 }, ''); 22 }, '');
23 } 23 }