00dani/stow
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Use Clone backend for Hash::Merge, not Storable

Browse source 
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:
Adam Spiers 2019-06-28 21:11:58 +01:00
parent 089151c116
commit 00c92076d9
4 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
bin/stow.in
View file

@ -462,7 +462,10 @@ use Getopt::Long qw(GetOptionsFromArray);
use Stow;
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;
$ProgramName =~ s{.*/}{};