Author: BINGOS
Date: Wed Jun 24 02:01:57 2009
New Revision: 12899

Modified:
   CPANPLUS-Dist-Build/trunk/Changes
   CPANPLUS-Dist-Build/trunk/lib/CPANPLUS/Dist/Build.pm
   CPANPLUS-Dist-Build/trunk/lib/CPANPLUS/Dist/Build/Constants.pm

Log:
Fix to _find_prereqs() for VMS when running prereq_data Build target, reported 
by Craig Berry.

Modified: CPANPLUS-Dist-Build/trunk/Changes
==============================================================================
--- CPANPLUS-Dist-Build/trunk/Changes   (original)
+++ CPANPLUS-Dist-Build/trunk/Changes   Wed Jun 24 02:01:57 2009
@@ -1,5 +1,9 @@
 Revision history for Perl extension CPANPLUS::Dist::Build.
 
+0.35_01 Wed Jun 24 09:57:28 BST 2009
+  - Fix to _find_prereqs() for VMS when running prereq_data
+    Build target, reported by Craig Berry.
+
 0.34 Sat Jun 13 09:50:24 BST 2009
   - Fixed the 02packages.details.txt.gz file in our fake CPAN
       CPANPLUS-0.87_01 now checks this file for sanity. Ours

Modified: CPANPLUS-Dist-Build/trunk/lib/CPANPLUS/Dist/Build.pm
==============================================================================
--- CPANPLUS-Dist-Build/trunk/lib/CPANPLUS/Dist/Build.pm        (original)
+++ CPANPLUS-Dist-Build/trunk/lib/CPANPLUS/Dist/Build.pm        Wed Jun 24 
02:01:57 2009
@@ -30,7 +30,7 @@
 
 local $Params::Check::VERBOSE = 1;
 
-$VERSION = '0.34';
+$VERSION = '0.35_01';
 
 =pod
 
@@ -383,8 +383,9 @@
 
         # Use the new Build action 'prereq_data'
         my $run_perl    = $conf->get_program('perlwrapper');
+        my $flag    = ON_VMS ? '"prereq_data"' : 'prereq_data';
 
-        unless ( scalar run(    command => [$perl, $run_perl, BUILD->($dir), 
'prereq_data', @buildflags],
+        unless ( scalar run(    command => [$perl, $run_perl, BUILD->($dir), 
$flag, @buildflags],
                                 buffer  => \$content,
                                 verbose => 0 ) 
         ) {

Modified: CPANPLUS-Dist-Build/trunk/lib/CPANPLUS/Dist/Build/Constants.pm
==============================================================================
--- CPANPLUS-Dist-Build/trunk/lib/CPANPLUS/Dist/Build/Constants.pm      
(original)
+++ CPANPLUS-Dist-Build/trunk/lib/CPANPLUS/Dist/Build/Constants.pm      Wed Jun 
24 02:01:57 2009
@@ -9,7 +9,7 @@
     require Exporter;
     use vars    qw[$VERSION @ISA @EXPORT];
   
-    $VERSION    = '0.34';
+    $VERSION    = '0.35_01';
     @ISA        = qw[Exporter];
     @EXPORT     = qw[ BUILD_DIR BUILD ];
 }

Reply via email to