mirror of
https://github.com/fosslinux/live-bootstrap.git
synced 2026-03-02 01:18:08 +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.18.4/patches/PPPort-pm-reproducible.patch
Normal file
19
steps/perl-5.18.4/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 @api to make PPPort.pm reproducible.
|
||||
|
||||
diff --git perl-5.18.4/cpan/Devel-PPPort/PPPort_pm.PL perl-5.18.4/cpan/Devel-PPPort/PPPort_pm.PL
|
||||
index e1118caf66..009beeb594 100644
|
||||
--- perl-5.18.4/cpan/Devel-PPPort/PPPort_pm.PL
|
||||
+++ perl-5.18.4/cpan/Devel-PPPort/PPPort_pm.PL
|
||||
@@ -40,7 +40,7 @@ $data = expand($data);
|
||||
my @api = sort { lc $a cmp lc $b } keys %provides;
|
||||
|
||||
$data =~ s{^(.*)__PROVIDED_API__(\s*?)^}
|
||||
- {join '', map "$1$_\n", @api}gem;
|
||||
+ {join '', map "$1$_\n", sort @api}gem;
|
||||
|
||||
{
|
||||
my $len = 0;
|
||||
19
steps/perl-5.22.4/patches/PPPort-pm-reproducible.patch
Normal file
19
steps/perl-5.22.4/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 @api to make PPPort.pm reproducible.
|
||||
|
||||
diff --git perl-5.22.4/cpan/Devel-PPPort/PPPort_pm.PL perl-5.22.4/cpan/Devel-PPPort/PPPort_pm.PL
|
||||
index e1118caf66..009beeb594 100644
|
||||
--- perl-5.22.4/cpan/Devel-PPPort/PPPort_pm.PL
|
||||
+++ perl-5.22.4/cpan/Devel-PPPort/PPPort_pm.PL
|
||||
@@ -40,7 +40,7 @@ $data = expand($data);
|
||||
my @api = sort { lc $a cmp lc $b } keys %provides;
|
||||
|
||||
$data =~ s{^(.*)__PROVIDED_API__(\s*?)^}
|
||||
- {join '', map "$1$_\n", @api}gem;
|
||||
+ {join '', map "$1$_\n", sort @api}gem;
|
||||
|
||||
{
|
||||
my $len = 0;
|
||||
19
steps/perl-5.24.4/patches/PPPort-pm-reproducible.patch
Normal file
19
steps/perl-5.24.4/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 @api to make PPPort.pm reproducible.
|
||||
|
||||
diff --git perl-5.24.4/cpan/Devel-PPPort/PPPort_pm.PL perl-5.24.4/cpan/Devel-PPPort/PPPort_pm.PL
|
||||
index e1118caf66..009beeb594 100644
|
||||
--- perl-5.24.4/cpan/Devel-PPPort/PPPort_pm.PL
|
||||
+++ perl-5.24.4/cpan/Devel-PPPort/PPPort_pm.PL
|
||||
@@ -40,7 +40,7 @@ $data = expand($data);
|
||||
my @api = sort { lc $a cmp lc $b } keys %provides;
|
||||
|
||||
$data =~ s{^(.*)__PROVIDED_API__(\s*?)^}
|
||||
- {join '', map "$1$_\n", @api}gem;
|
||||
+ {join '', map "$1$_\n", sort @api}gem;
|
||||
|
||||
{
|
||||
my $len = 0;
|
||||
19
steps/perl-5.30.3/patches/PPPort-pm-reproducible.patch
Normal file
19
steps/perl-5.30.3/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 @api to make PPPort.pm reproducible.
|
||||
|
||||
diff --git perl-5.30.3/dist/Devel-PPPort/PPPort_pm.PL perl-5.30.3/dist/Devel-PPPort/PPPort_pm.PL
|
||||
index e1118caf66..009beeb594 100644
|
||||
--- perl-5.30.3/dist/Devel-PPPort/PPPort_pm.PL
|
||||
+++ perl-5.30.3/dist/Devel-PPPort/PPPort_pm.PL
|
||||
@@ -40,7 +40,7 @@ $data = expand($data);
|
||||
my @api = sort { lc $a cmp lc $b } keys %provides;
|
||||
|
||||
$data =~ s{^(.*)__PROVIDED_API__(\s*?)^}
|
||||
- {join '', map "$1$_\n", @api}gem;
|
||||
+ {join '', map "$1$_\n", sort @api}gem;
|
||||
|
||||
{
|
||||
my $len = 0;
|
||||
19
steps/perl-5.36.3/patches/PPPort-pm-reproducible.patch
Normal file
19
steps/perl-5.36.3/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.36.3/dist/Devel-PPPort/PPPort_pm.PL perl-5.36.3/dist/Devel-PPPort/PPPort_pm.PL
|
||||
index cfbfaeb8fa..88c4bcc13c 100644
|
||||
--- perl-5.36.3/dist/Devel-PPPort/PPPort_pm.PL
|
||||
+++ perl-5.36.3/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;
|
||||
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