diff options
author | Edmund von der Burg <evdb@mysociety.org> | 2011-05-19 16:55:04 +0100 |
---|---|---|
committer | Edmund von der Burg <evdb@mysociety.org> | 2011-05-19 16:55:45 +0100 |
commit | f1c272f34fe3ff1cc4ab17d95379337cfc664967 (patch) | |
tree | 234af87b17f94d28e18ca36a13ab9bfe96f3b7ae /perl-external/bin/module-manage.pl | |
parent | 75a3614767dde3b3f0376acd9879bc09b4ba09e4 (diff) |
strip out remaining dpan related bits
Diffstat (limited to 'perl-external/bin/module-manage.pl')
-rwxr-xr-x | perl-external/bin/module-manage.pl | 19 |
1 files changed, 10 insertions, 9 deletions
diff --git a/perl-external/bin/module-manage.pl b/perl-external/bin/module-manage.pl index 5cdcc0334..01a4f9ba2 100755 --- a/perl-external/bin/module-manage.pl +++ b/perl-external/bin/module-manage.pl @@ -38,13 +38,11 @@ exit; sub init { add('App::cpanminus'); - add('MyCPAN::App::DPAN'); } sub setup { fetch_all(); build('App::cpanminus'); - build('MyCPAN::App::DPAN'); build_all(); } @@ -82,13 +80,16 @@ sub add { sub index_minicpan { # go to the minicpan dir and run dpan there - if ( `which dpan` =~ m/\S/ ) { - chdir $minicpan; - system "dpan -f ../dpan_config"; - } - else { - warn "Skipping indexing - could not find dpan"; - } + # if ( `which dpan` =~ m/\S/ ) { + # chdir $minicpan; + # system "dpan -f ../dpan_config"; + # } + # else { + # warn "Skipping indexing - could not find dpan"; + # } + + warn "implement indexing"; + } sub build_all { |