version 1.90, 2004/09/29 14:50:43
|
version 1.91, 2004/10/05 20:35:02
|
Line 804 sub Increment_PrgWin {
|
Line 804 sub Increment_PrgWin {
|
my $sec = $time_est % 60; |
my $sec = $time_est % 60; |
# |
# |
my $str; |
my $str; |
if ($min == 1 && $sec > 1) { |
if ($min == 0 && $sec > 1) { |
$str = '[_2] seconds'; |
$str = '[_2] seconds'; |
|
} elsif ($min == 1 && $sec > 1) { |
|
$str = '1 minute [_2] seconds'; |
} elsif ($min == 1 && $sec < 2) { |
} elsif ($min == 1 && $sec < 2) { |
$str = '1 minute'; |
$str = '1 minute'; |
} elsif ($min < 10 && $sec > 1) { |
} elsif ($min < 10 && $sec > 1) { |