mirror/perl
1
0
Fork 0
mirror of https://github.com/Perl/perl5.git synced 2026-01-26 16:39:36 +00:00
Code Issues Packages Projects Releases Wiki Activity

In installperl, simplify the strip/chmod code for libraries on Darwin.

Browse Source
This commit is contained in:
Nicholas Clark 2011-12-24 13:40:24 +01:00
parent efe502bb62
commit 3a548b368f
1 changed files with 3 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
installperl
View File

@ -788,14 +788,9 @@ sub installlib {
# HP-UX (at least) needs to maintain execute permissions
# on dynamically-loaded libraries.
if (copy_if_diff($_, "$installlib/$name")) {
if ($name =~ /\.(so|$dlext)$/o) {
strip("-S", "$installlib/$name") if $^O =~ /^(rhapsody|darwin)$/;
chmod(0555, "$installlib/$name");
} else {
strip("-S", "$installlib/$name")
if ($name =~ /\.a$/o and $^O =~ /^(rhapsody|darwin)$/);
chmod(0444, "$installlib/$name");
}
strip("-S", "$installlib/$name")
if $^O =~ /^(rhapsody|darwin)$/ and /\.(?:so|$dlext|a)$/;
chmod(/\.(so|$dlext)$/ ? 0555 : 0444, "$installlib/$name");
}
}
}