kivitendo/SL/Helper/DateTime.pm @ fe421d00
| 51c64daf | Moritz Bunkus | package DateTime;
|
||
| 02742685 | Sven Schöling | use strict;
|
||
| 51c64daf | Moritz Bunkus | sub now_local {
|
||
return shift->now(time_zone => $::locale->get_local_time_zone);
|
||||
}
|
||||
sub today_local {
|
||||
return shift->now(time_zone => $::locale->get_local_time_zone)->truncate(to => 'day');
|
||||
}
|
||||
sub to_lxoffice {
|
||||
return $::locale->format_date(\%::myconfig, $_[0]);
|
||||
}
|
||||
sub from_lxoffice {
|
||||
return $::locale->parse_date_to_object(\%::myconfig, $_[1]);
|
||||
}
|
||||
1;
|
||||
__END__
|
||||
=encoding utf8
|
||||
=head1 NAME
|
||||
SL::Helpers::DateTime - helper functions for L<DateTime>
|
||||
=head1 FUNCTIONS
|
||||
=over 4
|
||||
=item C<now_local>
|
||||
Returns the current time with the time zone set to the local time zone.
|
||||
=item C<today_local>
|
||||
Returns the current date with the time zone set to the local time zone.
|
||||
=item C<to_lxoffice>
|
||||
Formats the date according to the current Lx-Office user's date
|
||||
format.
|
||||
=item C<from_lxoffice>
|
||||
Parses a date string formatted in the current Lx-Office user's date
|
||||
format and returns an instance of L<DateTime>.
|
||||
=back
|
||||
=head1 AUTHOR
|
||||
Moritz Bunkus E<lt>m.bunkus@linet-services.deE<gt>
|
||||
=cut
|