Attempt to validate ISBNs in AddedContent.pm. collab/dyrcona/added_content_isbn_twiddling
authorJason Stephenson <jstephenson@mvlc.org>
Wed, 9 Jul 2014 20:34:26 +0000 (16:34 -0400)
committerJason Stephenson <jstephenson@mvlc.org>
Wed, 9 Jul 2014 20:53:35 +0000 (16:53 -0400)
commitbb49eb853c60066e5fbb9e616dca8a183c30d1b1
tree2201d03251c9da6e143c21c8628bb52a16564c53
parent694d4fab48e38e661ee13828bb5da80c01acdeec
Attempt to validate ISBNs in AddedContent.pm.

When getting ISBNs from the database, they often contain extra stuff
after the ISBN that sometimes causes problems for Business::ISBN.

This commit attempts to resolve some of that by looking only for the
part of the ISBN data that resembles an ISBN and using just that part.
If the ISBN data doesn't look like an ISBN, then it is discarded.

Signed-off-by: Jason Stephenson <jstephenson@mvlc.org>
Open-ILS/src/perlmods/lib/OpenILS/WWW/AddedContent.pm