From d4f009d45727217963843b830339f5eb4b10fb33 Mon Sep 17 00:00:00 2001 From: Bernardo Gonzalez Kriegel Date: Thu, 3 Dec 2015 09:19:17 -0300 Subject: [PATCH] [PASSED QA] 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 Signed-off-by: Katrin Fischer --- C4/Ris.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/C4/Ris.pm b/C4/Ris.pm index d333461..21acd96 100644 --- 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"; } } -- 1.9.1