projects
/
clearscm.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fixed long standing bug with hit_count
[clearscm.git]
/
maps
/
bin
/
MAPSUtil.pm
diff --git
a/maps/bin/MAPSUtil.pm
b/maps/bin/MAPSUtil.pm
index
e28a9d6
..
82f7bc7
100644
(file)
--- a/
maps/bin/MAPSUtil.pm
+++ b/
maps/bin/MAPSUtil.pm
@@
-17,6
+17,10
@@
package MAPSUtil;
use strict;
use vars qw (@ISA @EXPORT);
use strict;
use vars qw (@ISA @EXPORT);
+BEGIN {
+ $ENV{TZ}='America/Los_Angeles';
+} # BEGIN
+
@ISA = qw (Exporter);
@EXPORT = qw (
@ISA = qw (Exporter);
@EXPORT = qw (
@@
-42,6
+46,9
@@
sub FormatTime {
my ($time) = @_;
my $hours = substr $time, 0, 2;
my ($time) = @_;
my $hours = substr $time, 0, 2;
+
+ $hours = substr $hours, 1, 1 if $hours < 10;
+
my $minutes = substr $time, 3, 2;
my $seconds = substr $time, 6, 2;
my $AmPm = $hours > 12 ? 'Pm' : 'Am';
my $minutes = substr $time, 3, 2;
my $seconds = substr $time, 6, 2;
my $AmPm = $hours > 12 ? 'Pm' : 'Am';