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

(-)a/Koha/CirculationRules.pm (-2 / +1 lines)
Lines 384-390 sub set_rule { Link Here
384
    $rule_value = undef if defined $rule_value && $rule_value eq "" && !$can_be_blank;
384
    $rule_value = undef if defined $rule_value && $rule_value eq "" && !$can_be_blank;
385
    my $is_monetary = defined $kind_info->{is_monetary} ? $kind_info->{is_monetary} : 0;
385
    my $is_monetary = defined $kind_info->{is_monetary} ? $kind_info->{is_monetary} : 0;
386
    Koha::Exceptions::CirculationRule::NotDecimal->throw( name => $rule_name, value => $rule_value )
386
    Koha::Exceptions::CirculationRule::NotDecimal->throw( name => $rule_name, value => $rule_value )
387
        if ( $is_monetary && !$can_be_blank && defined($rule_value) && $rule_value !~ /^\d+(\.\d{2})?$/ );
387
        if ( $is_monetary && defined($rule_value) && $rule_value ne '' && $rule_value !~ /^\d+(\.\d{2})?$/ );
388
388
389
    for my $v ( $branchcode, $categorycode, $itemtype ) {
389
    for my $v ( $branchcode, $categorycode, $itemtype ) {
390
        $v = undef if $v and $v eq '*';
390
        $v = undef if $v and $v eq '*';
391
- 

Return to bug 32271