projects
/
clearscm.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Changed to not try new images while the monitor is off
[clearscm.git]
/
lib
/
DateUtils.pm
diff --git
a/lib/DateUtils.pm
b/lib/DateUtils.pm
index
b8c1f49
..
6c8164f
100644
(file)
--- a/
lib/DateUtils.pm
+++ b/
lib/DateUtils.pm
@@
-60,7
+60,7
@@
use Time::Local;
use Display;
use Utils;
use Display;
use Utils;
-our @EXPORT = qw
(
+our @EXPORT = qw(
Add
Age
Compare
Add
Age
Compare
@@
-79,6
+79,7
@@
our @EXPORT = qw (
YMDHMS
timestamp
ymdhms
YMDHMS
timestamp
ymdhms
+ MDYHMS2SQLDatetime
);
my @months = (
);
my @months = (
@@
-711,6
+712,8
@@
Returns:
my $AmPm = $hours > 12 ? "Pm" : "Am";
$hours = $hours - 12 if $hours > 12;
my $AmPm = $hours > 12 ? "Pm" : "Am";
$hours = $hours - 12 if $hours > 12;
+
+ $hours = "0$hours" if length $hours == 1;
return "$hours:$minutes $AmPm";
} # FormatTime
return "$hours:$minutes $AmPm";
} # FormatTime
@@
-1260,7
+1263,7
@@
Returns:
=head3 Perl Modules
=head3 Perl Modules
-=for html <p><a href="/php/
cvs
_man.php?file=lib/Display.pm">Display</a></p>
+=for html <p><a href="/php/
scm
_man.php?file=lib/Display.pm">Display</a></p>
=head1 INCOMPATABILITIES
=head1 INCOMPATABILITIES