fixed form error.

This commit is contained in:
Matthew Wilson 2005-11-04 05:57:11 +00:00
parent 617a7b9698
commit fec3edd516

View file

@ -646,6 +646,7 @@ A string in the format of YYYY-MM-DD or YYYY-MM-DD HH:MM:SS.
sub setToEpoch {
my $set = shift;
return undef unless defined $set;
my $parser = DateTime::Format::Strptime->new( pattern => '%Y-%m-%d %H:%M:%S' );
my $dt = $parser->parse_datetime($set);
# in epochToSet we apply the user's time zone, so now we have to remove it.