Bug 14971: fix RIS export

This patch removes a limit in RIS.pm print_isbn sub.

To test:
1) Find in opac a book with an isbn with length(isbn) > 10
(with dashes or isbn13)
2) Export record to RIS format, check truncated SN field
in exported file
3) Apply the patch
4) Export again, no more truncation

Signed-off-by: jvr <jvr@fct.unl.pt>
Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>

diff --git a/C4/Ris.pm b/C4/Ris.pm
index d333461..21acd96 100644 (file)
--- a/C4/Ris.pm
+++ b/C4/Ris.pm
@@ -614,7 +614,7 @@ sub print_isbn {
            warn("truncated isbn") if $marcprint;
        }
 
-       my $isbn = substr($isbnfield->subfield('a'), 0, 10);
+    my $isbn = $isbnfield->subfield('a');
        print "SN  - ", &charconv($isbn), "\r\n";
     }
 }