Skip to content
Browse files

clean up inc::latest guts

git-svn-id: http://svn.perl.org/modules/Module-Build/trunk@13679 50811bd7-b8ce-0310-adc1-d9db26280581
  • Loading branch information...
1 parent 6e10bb4 commit d9611b4264fceee4d76777ef74aa010fdfb43686 @xdg xdg committed Dec 17, 2009
Showing with 2 additions and 2 deletions.
  1. +2 −2 lib/inc/latest.pm
View
4 lib/inc/latest.pm
@@ -21,9 +21,9 @@ sub import {
my ($package, $mod, @args) = @_;
return unless(defined $mod);
- my $inc_path = 'inc/latest.pm';
my $private_path = 'inc/latest/private.pm';
- if(-e $inc_path) {
+ if(-e $private_path) {
+ # user mode - delegate work to bundled private module
require $private_path;
splice( @_, 0, 1, 'inc::latest::private');
goto \&inc::latest::private::import;

0 comments on commit d9611b4

Please sign in to comment.
Something went wrong with that request. Please try again.