Mercurial > pub > Impl
diff Lib/IMPL/require.pm @ 205:891c04080658
IMPL::Web::View fixed template selection, release candidate
author | sergey |
---|---|
date | Thu, 03 May 2012 01:00:02 +0400 |
parents | 6b1dda998839 |
children | 6d8092d8ce1b |
line wrap: on
line diff
--- a/Lib/IMPL/require.pm Wed May 02 17:42:47 2012 +0400 +++ b/Lib/IMPL/require.pm Thu May 03 01:00:02 2012 +0400 @@ -1,5 +1,6 @@ package IMPL::require; use Scalar::Util qw(set_prototype); +use strict; sub import { my ($self, $aliases) = @_; @@ -8,7 +9,7 @@ die "A hash reference is required" unless ref $aliases eq 'HASH'; - my $caller = $caller; + my $caller = caller; no strict 'refs';