X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=Makefile.PL;h=333dac0c4def2bb379555699cb1d0c12a0ae6fa1;hb=e6ff1534ace858986b43cfdbe20a3d86346a628b;hp=a7e84dbdec4fd9d2e4c0d1adda9439ccb7814d3f;hpb=5ae3324ff295015e051249ded13b2353ee8af258;p=perl%2Fmodules%2FSub-Op.git

diff --git a/Makefile.PL b/Makefile.PL
index a7e84db..333dac0 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -15,7 +15,7 @@ my %PREREQ_PM = (
  'B::Hooks::EndOfScope' => 0,
  'DynaLoader'           => 0,
  'Scalar::Util'         => 0,
- 'Variable::Magic'      => '0.39',
+ 'Variable::Magic'      => '0.40',
 );
 
 my %META = (
@@ -24,6 +24,7 @@ my %META = (
   'ExtUtils::MakeMaker' => 0,
  },
  build_requires => {
+  'B::Deparse'          => 0,
   'Cwd'                 => 0,
   'ExtUtils::Depends'   => 0,
   'ExtUtils::MakeMaker' => 0,
@@ -80,6 +81,7 @@ WriteMakefile(
  open my $fh, '>', $args_dat or die "open(>$args_dat): $!";
  for (@ARGV) {
   my $arg = $_;
+  $arg =~ s{\s*(['"])\s*(.*)\s*\1\s*$}{$2}s;
   $arg =~ s{([^=/.a-zA-Z0-9-])}{sprintf "[%d]", ord $1}ge;
   print $fh "$arg\n";
  }