X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=koha_perl_deps.pl;h=01e17d55b2ac6d8db936be2f8e674e872ba81dcb;hb=40b907bc0bc6db7500dde805ee188c0cf0ac6ae5;hp=934dea58e63bf62d01fbfe4b20b21145e3974c99;hpb=e08d35bdc32b4dfada80d0018f66457846e6b298;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;