Lines 93-99
sub addDate {
Link Here
|
93 |
Readonly::Scalar my $return_by_hour => 10; |
93 |
Readonly::Scalar my $return_by_hour => 10; |
94 |
my $day_dur = DateTime::Duration->new( days => 1 ); |
94 |
my $day_dur = DateTime::Duration->new( days => 1 ); |
95 |
if ( $add_duration->is_negative() ) { |
95 |
if ( $add_duration->is_negative() ) { |
96 |
$day_dur->inverse(); |
96 |
$day_dur = DateTime::Duration->new( days => -1 ); |
97 |
} |
97 |
} |
98 |
if ( $days_mode eq 'Datedue' ) { |
98 |
if ( $days_mode eq 'Datedue' ) { |
99 |
|
99 |
|
100 |
- |
|
|