diff options
| -rwxr-xr-x | perl-external/bin/module-manage.pl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-external/bin/module-manage.pl b/perl-external/bin/module-manage.pl index 17c0db8da..187340da8 100755 --- a/perl-external/bin/module-manage.pl +++ b/perl-external/bin/module-manage.pl @@ -9,6 +9,9 @@ use File::Slurp; use Path::Class; use List::MoreUtils 'uniq'; +# TODO - 'updates' action that lists packages that could be updated +# TODO - add smarts to strip out old packages (could switch to building using files.txt after) + my $root_dir = file(__FILE__)->dir->parent->absolute->stringify; my $module_list = "$root_dir/modules.txt"; my $file_list = "$root_dir/files.txt"; @@ -204,7 +207,7 @@ sub fetch { my $url = shift @urls; # try to fetch - print " Trying '$url'...\n"; + print " Fetching '$url'...\n"; last if is_success( getstore( $url, "$destination" ) ); # if more options try again |