|
Lines 38-43
Koha::Patron;;Category - Koha Patron;;Category Object class
Link Here
|
| 38 |
|
38 |
|
| 39 |
sub store { |
39 |
sub store { |
| 40 |
my ( $self ) = @_; |
40 |
my ( $self ) = @_; |
|
|
41 |
$self->dateofbirthrequired(undef) |
| 42 |
if not defined $self->dateofbirthrequired |
| 43 |
or $self->dateofbirthrequired eq ''; |
| 44 |
$self->upperagelimit(undef) |
| 45 |
if not defined $self->upperagelimit |
| 46 |
or $self->upperagelimit eq ''; |
| 41 |
$self->checkprevcheckout('inherit') |
47 |
$self->checkprevcheckout('inherit') |
| 42 |
unless defined $self->checkprevcheckout; |
48 |
unless defined $self->checkprevcheckout; |
| 43 |
return $self->SUPER::store; |
49 |
return $self->SUPER::store; |
| 44 |
- |
|
|