http://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=9593
--- Comment #3 from mathieu saby <[email protected]> --- My solution was changing these lines in MungeMarcPrice routine: - ( $price ) = $price =~ m/([\d\,\.]+[[\,\.]\d\d]?)/; + ( $price ) = $price =~ m/([\d\,\.]+[\,|\.\d\d]?)/; ## Split price into array on periods and commas my @parts = split(/[\,\.]/, $price); ## If the last grouping of digits is more than 2 characters, assume there is no decimal value and put it back. my $decimal = pop( @parts ); - if ( length( $decimal ) > 2 ) { + if ((scalar @parts == 0) or ( length( $decimal ) > 2 )) { M. Saby -- You are receiving this mail because: You are the assignee for the bug. You are watching all bug changes. _______________________________________________ Koha-bugs mailing list [email protected] http://lists.koha-community.org/cgi-bin/mailman/listinfo/koha-bugs website : http://www.koha-community.org/ git : http://git.koha-community.org/ bugs : http://bugs.koha-community.org/
