[Bast-commits] r6688 - local-lib/1.000/trunk

[t0m at dev.catalyst.perl.org]

Author: t0m
Date: 2009-06-15 23:54:27 +0000 (Mon, 15 Jun 2009)
New Revision: 6688

Modified:
   local-lib/1.000/trunk/Changes
   local-lib/1.000/trunk/Makefile.PL
Log:
Fix warning

Modified: local-lib/1.000/trunk/Changes
===================================================================
--- local-lib/1.000/trunk/Changes	2009-06-15 23:51:01 UTC (rev 6687)
+++ local-lib/1.000/trunk/Changes	2009-06-15 23:54:27 UTC (rev 6688)
@@ -1,5 +1,6 @@
 Revision history for local::lib
 
+        - Fix warning from Makefile.PL about ExtUtils::MakeMaker::prompt (t0m)
         - Set PERL5LIB back to calculated @INC with --self-contained, to stop
           invoking other perl scripts from losing the local::lib if they
           mangle @INC from $ENV{PERL5LIB} (t0m)

Modified: local-lib/1.000/trunk/Makefile.PL
===================================================================
--- local-lib/1.000/trunk/Makefile.PL	2009-06-15 23:51:01 UTC (rev 6687)
+++ local-lib/1.000/trunk/Makefile.PL	2009-06-15 23:54:27 UTC (rev 6688)
@@ -53,7 +53,7 @@
     system($^X, '-MCPAN', '-e',
       'my $done; require ExtUtils::MakeMaker;
        my $orig = ExtUtils::MakeMaker->can("prompt");
-       *ExtUtils::MakeMaker::prompt = sub {
+       *ExtUtils::MakeMaker::prompt = sub ($;$) {
          if (!$done && $_[0] =~ /manual configuration/) {
            $done++;
            return "no";