mirror of
https://github.com/fosslinux/live-bootstrap.git
synced 2026-03-22 11:06:32 +01:00
Make PPPort.pm reproducible in Perl 5.18+
This commit is contained in:
parent
4322a200f5
commit
e4980c20e8
6 changed files with 114 additions and 0 deletions
19
steps/perl-5.42.0/patches/PPPort-pm-reproducible.patch
Normal file
19
steps/perl-5.42.0/patches/PPPort-pm-reproducible.patch
Normal file
|
|
@ -0,0 +1,19 @@
|
|||
SPDX-FileCopyrightText: 2025 fosslinux <fosslinux@aussies.space>
|
||||
|
||||
SPDX-License-Identifier: Artistic-1.0
|
||||
|
||||
Sort the list of types in @provided to make PPPort.pm reproducible.
|
||||
|
||||
diff --git perl-5.42.0/dist/Devel-PPPort/PPPort_pm.PL perl-5.42.0/dist/Devel-PPPort/PPPort_pm.PL
|
||||
index cfbfaeb8fa..88c4bcc13c 100644
|
||||
--- perl-5.42.0/dist/Devel-PPPort/PPPort_pm.PL
|
||||
+++ perl-5.42.0/dist/Devel-PPPort/PPPort_pm.PL
|
||||
@@ -53,7 +53,7 @@ my @provided = sort dictionary_order keys %provides;
|
||||
|
||||
# which further expands $data.
|
||||
$data =~ s{^(.*)__PROVIDED_API__(\s*?)^}
|
||||
- {join '', map "$1$_\n", @provided}gem;
|
||||
+ {join '', map "$1$_\n", sort @provided}gem;
|
||||
|
||||
{
|
||||
my $len = 0;
|
||||
Loading…
Add table
Add a link
Reference in a new issue