|
Lines 890-902
sub store {
Link Here
|
| 890 |
|
890 |
|
| 891 |
sub _set_default_expirationdate { |
891 |
sub _set_default_expirationdate { |
| 892 |
my $self = shift; |
892 |
my $self = shift; |
|
|
893 |
my $reservedate = dt_from_string($self->reservedate)->clone; |
| 893 |
|
894 |
|
| 894 |
my $period = C4::Context->preference('DefaultHoldExpirationdatePeriod') || 0; |
895 |
my $period = C4::Context->preference('DefaultHoldExpirationdatePeriod') || 0; |
| 895 |
my $timeunit = |
896 |
my $timeunit = |
| 896 |
C4::Context->preference('DefaultHoldExpirationdateUnitOfTime') || 'days'; |
897 |
C4::Context->preference('DefaultHoldExpirationdateUnitOfTime') || 'days'; |
| 897 |
|
898 |
|
| 898 |
$self->expirationdate( |
899 |
$self->expirationdate( |
| 899 |
dt_from_string( $self->reservedate )->add( $timeunit => $period ) ); |
900 |
dt_from_string( $reservedate )->add( $timeunit => $period ) ); |
| 900 |
} |
901 |
} |
| 901 |
|
902 |
|
| 902 |
=head3 _move_to_old |
903 |
=head3 _move_to_old |
| 903 |
- |
|
|