View | Details | Raw Unified | Return to bug 21599
Collapse All | Expand All

(-)a/Koha/ItemType.pm (-1 / +12 lines)
Lines 37-42 Koha::ItemType - Koha Item type Object class Link Here
37
37
38
=cut
38
=cut
39
39
40
sub store {
41
    my ($self) = @_;
42
43
    $self->rentalcharge(undef)       if $self->rentalcharge eq '';
44
    $self->defaultreplacecost(undef) if $self->defaultreplacecost eq '';
45
    $self->processfee(undef)         if $self->processfee eq '';
46
    $self->notforloan(0) unless $self->notforloan;
47
    $self->hideinopac(0) unless $self->hideinopac;
48
49
    return $self->SUPER::store;
50
}
51
40
=head3 image_location
52
=head3 image_location
41
53
42
=cut
54
=cut
43
- 

Return to bug 21599