Skip to content
This repository has been archived by the owner on Mar 7, 2019. It is now read-only.

Commit

Permalink
extra commentary
Browse files Browse the repository at this point in the history
  • Loading branch information
plicease committed Sep 9, 2014
1 parent a26806d commit 10b3848
Showing 1 changed file with 9 additions and 0 deletions.
9 changes: 9 additions & 0 deletions lib/Alien/Base/ModuleBuild.pm
Expand Up @@ -327,6 +327,8 @@ sub ACTION_alien_install {

{
my $target = $self->alien_library_destination;
# prefix the target directory with $destdir so that package builds
# can install into a fake root
$target = File::Spec->catdir($destdir, $target) if defined $destdir;
local $CWD = $target;

Expand All @@ -349,6 +351,8 @@ sub ACTION_alien_install {

if ( $self->alien_isolate_dynamic ) {
my $target = $self->alien_library_destination;
# prefix the target directory with $destdir so that package builds
# can install into a fake root
$target = File::Spec->catdir($destdir, $target) if defined $destdir;
local $CWD = $target;
print "Isolating dynamic libraries ... ";
Expand Down Expand Up @@ -775,6 +779,11 @@ sub alien_refresh_packlist {

my $changed = 0;
my $files = $self->_rscan_destdir($dir);
# This is kind of strange, but MB puts the destdir paths in the
# packfile, when arguably it should not. Usually you will want
# to turn off packlists when you you are building an rpm anyway,
# but for the sake of maximum compat with MB we add the destdir
# back in after _rscan_destdir has stripped it out.
$files = [ map { File::Spec->catdir($self->destdir, $_) } @$files ]
if defined $self->destdir;
for my $file (@$files) {
Expand Down

0 comments on commit 10b3848

Please sign in to comment.