From 64af993e45279de8ef4c227d3d6b8cbb0940afb7 Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Sat, 19 Sep 2009 08:41:06 +0000 Subject: [PATCH] join PA and JI git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@1288 07558da8-63fa-0310-ba24-9fe276d99e06 --- lib/WebPAC/Input/ISI.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/WebPAC/Input/ISI.pm b/lib/WebPAC/Input/ISI.pm index 2a1606d..196e36e 100644 --- a/lib/WebPAC/Input/ISI.pm +++ b/lib/WebPAC/Input/ISI.pm @@ -128,7 +128,7 @@ sub new { } } elsif ( $line eq 'ER' ) { # join tags - foreach ( qw/AB DE ID TI SO RP SC FU FX/ ) { + foreach ( qw/AB DE ID TI SO RP SC FU FX PA JI/ ) { $rec->{$_} = join(' ', @{ $rec->{$_} }) if defined $rec->{$_}; } # split on ; -- 2.20.1