X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=koha_perl_deps.pl;h=01e17d55b2ac6d8db936be2f8e674e872ba81dcb;hb=ef304424e0e9063ad4feeda2c4b83a05e09c7c01;hp=934dea58e63bf62d01fbfe4b20b21145e3974c99;hpb=aa06ac905a3573d9804dfa5f70aff2fc91838de3;p=koha_gimpoz diff --git a/koha_perl_deps.pl b/koha_perl_deps.pl index 934dea58e6..01e17d55b2 100755 --- a/koha_perl_deps.pl +++ b/koha_perl_deps.pl @@ -39,10 +39,11 @@ push @pm, 'missing_pm' if $missing || $all; push @pm, 'upgrade_pm' if $upgrade || $all; push @pm, 'current_pm' if $installed || $all; -print color 'bold white' if $color; +print color 'bold blue' if $color; print" -Module Name Current Version Required Version Module Required --------------------------------------------------------------------------------------------------------------------------- + Installed Required Module is +Module Name Version Version Required +-------------------------------------------------------------------------------------------- "; my $count = 0; @@ -60,17 +61,17 @@ foreach my $type (@pm) { my $current_version = ($color ? $_->{$pm}->{'cur_ver'} : $type eq 'missing_pm' || $type eq 'upgrade_pm' ? $_->{$pm}->{'cur_ver'}." *" : $_->{$pm}->{'cur_ver'}); format = -@<<<<<<<<<<<<<<<<<<<<<<<<< @<<<<<<<<<< @<<<<<<<<<< @<<<<< -$pm, $current_version, $_->{$pm}->{'min_ver'}, $required +@<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< @<<<<<<<<<<<<<<<< @<<<<<<<<<<<<<<<< @<<<<< +$pm, $current_version, $_->{$pm}->{'min_ver'}, $required . write; } } } -print color 'bold white' if $color; +print color 'bold blue' if $color; my $footer = " --------------------------------------------------------------------------------------------------------------------------- -Total modules reported: $count "; +-------------------------------------------------------------------------------------------- +Total modules reported: $count "; if ($color) { $footer .= "\n\n"; @@ -80,6 +81,7 @@ else { } print $footer; +print color 'reset' if $color; 1;