Use Clone backend for Hash::Merge, not Storable
Need to avoid Storable backend, since it can't deal with regexps: https://rt.perl.org/Public/Bug/Display.html?id=50608 This should fix the Docker builds.
This commit is contained in:
parent
089151c116
commit
00c92076d9
4 changed files with 7 additions and 1 deletions
1
Build.PL
1
Build.PL
|
@ -61,6 +61,7 @@ my $build = Module::Build->new(
|
||||||
'Carp' => 0,
|
'Carp' => 0,
|
||||||
'IO::File' => 0,
|
'IO::File' => 0,
|
||||||
'Hash::Merge' => 0,
|
'Hash::Merge' => 0,
|
||||||
|
'Clone' => 0,
|
||||||
},
|
},
|
||||||
script_files => [ 'bin/stow', 'bin/chkstow' ],
|
script_files => [ 'bin/stow', 'bin/chkstow' ],
|
||||||
all_from => 'lib/Stow.pm.in',
|
all_from => 'lib/Stow.pm.in',
|
||||||
|
|
|
@ -29,6 +29,7 @@
|
||||||
"runtime" : {
|
"runtime" : {
|
||||||
"requires" : {
|
"requires" : {
|
||||||
"Carp" : "0",
|
"Carp" : "0",
|
||||||
|
"Clone" : "0",
|
||||||
"Hash::Merge" : "0",
|
"Hash::Merge" : "0",
|
||||||
"IO::File" : "0",
|
"IO::File" : "0",
|
||||||
"perl" : "5.006"
|
"perl" : "5.006"
|
||||||
|
|
1
META.yml
1
META.yml
|
@ -24,6 +24,7 @@ provides:
|
||||||
version: v2.3.0
|
version: v2.3.0
|
||||||
requires:
|
requires:
|
||||||
Carp: '0'
|
Carp: '0'
|
||||||
|
Clone: '0'
|
||||||
Hash::Merge: '0'
|
Hash::Merge: '0'
|
||||||
IO::File: '0'
|
IO::File: '0'
|
||||||
perl: '5.006'
|
perl: '5.006'
|
||||||
|
|
|
@ -462,7 +462,10 @@ use Getopt::Long qw(GetOptionsFromArray);
|
||||||
use Stow;
|
use Stow;
|
||||||
use Stow::Util qw(parent error);
|
use Stow::Util qw(parent error);
|
||||||
|
|
||||||
use Hash::Merge qw( merge );
|
# Need to avoid Storable backend, since it can't deal with regexps:
|
||||||
|
# https://rt.perl.org/Public/Bug/Display.html?id=50608
|
||||||
|
use Clone::Choose qw(:Clone);
|
||||||
|
use Hash::Merge qw(merge);
|
||||||
|
|
||||||
my $ProgramName = $0;
|
my $ProgramName = $0;
|
||||||
$ProgramName =~ s{.*/}{};
|
$ProgramName =~ s{.*/}{};
|
||||||
|
|
Loading…
Reference in a new issue