Lines 50-55
sub effective_BlockExpiredPatronOpacActions {
Link Here
|
50 |
return $self->BlockExpiredPatronOpacActions |
50 |
return $self->BlockExpiredPatronOpacActions |
51 |
} |
51 |
} |
52 |
|
52 |
|
|
|
53 |
=head3 store |
54 |
|
55 |
=cut |
56 |
|
57 |
sub store { |
58 |
my ($self) = @_; |
59 |
|
60 |
$self->dateofbirthrequired(undef) |
61 |
if not defined $self->dateofbirthrequired |
62 |
or $self->dateofbirthrequired eq ''; |
63 |
|
64 |
$self->upperagelimit(undef) |
65 |
if not defined $self->upperagelimit |
66 |
or $self->upperagelimit eq ''; |
67 |
|
68 |
$self->checkprevcheckout('inherit') |
69 |
unless defined $self->checkprevcheckout; |
70 |
|
71 |
return $self->SUPER::store; |
72 |
} |
73 |
|
53 |
=head3 default_messaging |
74 |
=head3 default_messaging |
54 |
|
75 |
|
55 |
my $messaging = $category->default_messaging(); |
76 |
my $messaging = $category->default_messaging(); |
56 |
- |
|
|