Update of /cvsroot/module-build/CPANPLUS-Dist-Build/lib/CPANPLUS/Dist
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11168/lib/CPANPLUS/Dist
Modified Files:
Build.pm
Log Message:
Add the real function where I was using a stub
Index: Build.pm
===================================================================
RCS file: /cvsroot/module-build/CPANPLUS-Dist-Build/lib/CPANPLUS/Dist/Build.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -d -r1.7 -r1.8
--- Build.pm 12 Sep 2005 19:58:07 -0000 1.7
+++ Build.pm 23 Sep 2005 22:16:25 -0000 1.8
@@ -277,6 +277,7 @@
$dist->status->_mb_object( $mb );
### resolve prereqs ###
+ # XXX according to Jos, this should actually be in _resolve_prereqs(), not here.
my $prereqs = $dist->_find_prereqs( verbose => $verbose );
my %prereqs_out;
@@ -290,9 +291,9 @@
my $status = Module::Build->check_installed_status($mod, $prereqs->{$mod});
next if $status->{ok};
- # XXX get the latest version from the CPAN index and check it
+ # Get the latest version from the CPAN index and check it
no strict 'refs';
- local ${$mod . '::VERSION'} = get_indexed_version($mod); # XXX this function doesn't exist
+ local ${$mod . '::VERSION'} = $cb->module_tree($mod)->version;
$status = Module::Build->check_installed_status($mod, $prereqs->{$mod});
if ($status->{ok}) {
$prereqs_out{$mod} = $status->{have};
|
