Mercurial > pub > Impl

comparison lib/IMPL/declare.pm @ 411:ee36115f6a34 ref20150831

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
sync
author cin
date Mon, 21 Sep 2015 00:53:10 +0300
parents c6e90e02dd17
children 3ed0c58e9da3
comparison
equal deleted inserted replaced
410:9335cf010b23 411:ee36115f6a34
36 while ( my ( $alias, $class ) = each %$aliases ) { 36 while ( my ( $alias, $class ) = each %$aliases ) {
37 _trace("$alias => $class"); 37 _trace("$alias => $class");
38 $IMPL::require::level++; 38 $IMPL::require::level++;
39 my $c = _require($class); 39 my $c = _require($class);
40 40
41 *{"${caller}::$alias"} = sub() { 41 *{"${caller}::$alias"} = sub () {
42 $c; 42 $c;
43 }; 43 };
44 $IMPL::require::level--; 44 $IMPL::require::level--;
45 } 45 }
46 46