Mercurial > pub > Impl

diff Lib/IMPL/declare.pm @ 252:34a3f8668b58

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed IMPL::require IMPL::declare
author sergey
date Mon, 19 Nov 2012 01:28:58 +0400
parents 9f394b27dccf
children 32aceba4ee6d
line wrap: on
line diff
--- a/Lib/IMPL/declare.pm	Fri Nov 16 16:44:16 2012 +0400
+++ b/Lib/IMPL/declare.pm	Mon Nov 19 01:28:58 2012 +0400
@@ -25,6 +25,7 @@
 
 	my $aliases = $args->{require} || {};
 	
+	$IMPL::require::PENDING{$caller} = 1;
 	_trace("declare $caller");
 	$IMPL::require::level++;
 
@@ -106,6 +107,7 @@
 	}
 	
 	$IMPL::require::level--;
+	delete $IMPL::require::PENDING{$caller};
 }
 
 1;