/[gentoo-perl]/genlop/trunk/genlop
Gentoo

Diff of /genlop/trunk/genlop

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 176 Revision 177
23use Term::ANSIColor; 23use Term::ANSIColor;
24use Date::Manip; 24use Date::Manip;
25use LWP::Simple; 25use LWP::Simple;
26use File::Basename; 26use File::Basename;
27 27
28my $version = "0.30.6"; 28my $version = "0.30.7";
29my @logfiles = ("/var/log/emerge.log"); 29my @logfiles = ("/var/log/emerge.log");
30my %COLORS = ( 30my %COLORS = (
31 'blue' => 'bold blue', 31 'blue' => 'bold blue',
32 'green' => 'bold green', 32 'green' => 'bold green',
33 'red' => 'bold red', 33 'red' => 'bold red',
382 if ($hours > 0) 382 if ($hours > 0)
383 { 383 {
384 print ", " if ($days > 0); 384 print ", " if ($days > 0);
385 print colored("$hours", $COLORS{'green'}), " hour"; 385 print colored("$hours", $COLORS{'green'}), " hour";
386 print "s" if ($hours > 1); 386 print "s" if ($hours > 1);
387 print ", ";
388 } 387 }
389 if ($mins > 0) 388 if ($mins > 0)
390 { 389 {
391 print ", " if ($days > 0 or $hours > 0); 390 print ", " if ($days > 0 or $hours > 0);
392 print colored("$mins", $COLORS{'green'}), " minute"; 391 print colored("$mins", $COLORS{'green'}), " minute";

Legend:
Removed from v.176  
changed lines
  Added in v.177

  ViewVC Help
Powered by ViewVC 1.1.20