--- trunk/lib/WebPAC/Input/ISI.pm	2009/09/18 21:38:09	1287
+++ trunk/lib/WebPAC/Input/ISI.pm	2009/09/19 08:41:06	1288
@@ -128,7 +128,7 @@
 				}
 		} 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 ;