format-patch: pretty-print timestamp correctly.
Perl is not C and does not truncate the division result. Arghh! Signed-off-by: Junio C Hamano <junkio@cox.net>maint
parent
60ace8790f
commit
fab5de7936
|
@ -189,7 +189,7 @@ my @month_names = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec);
|
||||||
sub show_date {
|
sub show_date {
|
||||||
my ($time, $tz) = @_;
|
my ($time, $tz) = @_;
|
||||||
my $minutes = abs($tz);
|
my $minutes = abs($tz);
|
||||||
$minutes = ($minutes / 100) * 60 + ($minutes % 100);
|
$minutes = int($minutes / 100) * 60 + ($minutes % 100);
|
||||||
if ($tz < 0) {
|
if ($tz < 0) {
|
||||||
$minutes = -$minutes;
|
$minutes = -$minutes;
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue