[Patches] [PATCH] Bug 6914 - fixes for the color option of koha_perl_deps.pl

[koha-patchbot at kohaaloha.com]

From: Greg Barniskis <gbarniskis at gmail.com>
Date: Mon, 26 Sep 2011 11:15:06 -0500
Subject: [PATCH] Bug 6914 - fixes for the color option of koha_perl_deps.pl

Reset the terminal color mode after reporting (to avoid polluting the
user's shell), and use blue instead of white for the report header and
footer.

Signed-off-by: Chris Cormack <chrisc at catalyst.net.nz>
---
 koha_perl_deps.pl |    5 +++--
 1 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/koha_perl_deps.pl b/koha_perl_deps.pl
index c5b614e..01e17d5 100755
--- a/koha_perl_deps.pl
+++ b/koha_perl_deps.pl
@@ -39,7 +39,7 @@ 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"
                                               Installed         Required          Module is
 Module Name                                   Version           Version            Required
@@ -68,7 +68,7 @@ write;
         }
     }
 }
-print color 'bold white' if $color;
+print color 'bold blue' if $color;
 my $footer = "
 --------------------------------------------------------------------------------------------
 Total modules reported: $count                      ";
@@ -81,6 +81,7 @@ else {
 }
 
 print $footer;
+print color 'reset' if $color;
 
 1;
 
-- 
1.7.5.4