Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Improved Alien::Base::dist_dir's mechanism for extracting the share d…

…ir. More improvement still needed
  • Loading branch information...
commit d18c9f9edcd2e17e96e8fd332cd56a653d8ef21e 1 parent c166fd3
@jberger jberger authored
Showing with 3 additions and 1 deletion.
  1. +3 −1 lib/Alien/Base.pm
View
4 lib/Alien/Base.pm
@@ -42,7 +42,9 @@ sub dist_dir {
my $dist = $class;
$dist =~ s/::/-/g;
- return eval { File::ShareDir::dist_dir $dist } or $class->{build_share_dir};
+ my $dist_dir = eval { File::ShareDir::dist_dir($dist) } || $class->config('build_share_dir');
+
+ return $dist_dir;
}
sub new { return bless {}, $_[0] }
Please sign in to comment.
Something went wrong with that request. Please try again.