1 |
commit: c03b86e8afdff46e7a21a5317afecbb5866b655a |
2 |
Author: Andreas K. Hüttel <dilfridge <AT> gentoo <DOT> org> |
3 |
AuthorDate: Mon May 17 21:26:29 2021 +0000 |
4 |
Commit: Andreas K. Hüttel <dilfridge <AT> gentoo <DOT> org> |
5 |
CommitDate: Mon May 17 21:27:08 2021 +0000 |
6 |
URL: https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=c03b86e8 |
7 |
|
8 |
perl-functions.eclass: Add perl-fix_permissions |
9 |
|
10 |
Bug: https://bugs.gentoo.org/554346 |
11 |
Signed-off-by: Andreas K. Hüttel <dilfridge <AT> gentoo.org> |
12 |
|
13 |
eclass/perl-functions.eclass | 10 ++++++++++ |
14 |
1 file changed, 10 insertions(+) |
15 |
|
16 |
diff --git a/eclass/perl-functions.eclass b/eclass/perl-functions.eclass |
17 |
index e6168a07534..8633f384f1b 100644 |
18 |
--- a/eclass/perl-functions.eclass |
19 |
+++ b/eclass/perl-functions.eclass |
20 |
@@ -127,6 +127,16 @@ perl_delete_emptybsdir() { |
21 |
fi |
22 |
} |
23 |
|
24 |
+# @FUNCTION: perl_fix_permissions |
25 |
+# @DESCRIPTION: |
26 |
+# Make all of ${D} user-writable, since EU::MM does silly things with |
27 |
+# the w bit. See bug 554346. |
28 |
+perl_fix_permissions() { |
29 |
+ debug-print-function $FUNCNAME "$@" |
30 |
+ perl_set_version |
31 |
+ fperms -R u+w "${D}" |
32 |
+} |
33 |
+ |
34 |
# @FUNCTION: perl_fix_packlist |
35 |
# @DESCRIPTION: |
36 |
# Look through ${D} for .packlist text files containing the temporary installation |