Added 'distributor' field to I5 metadata
Change-Id: I464480fd82511c91d4ab252b8657a5db95b35c5e
diff --git a/lib/KorAP/XML/Meta/I5.pm b/lib/KorAP/XML/Meta/I5.pm
index a34c82e..6bd839a 100644
--- a/lib/KorAP/XML/Meta/I5.pm
+++ b/lib/KorAP/XML/Meta/I5.pm
@@ -44,6 +44,7 @@
# "biblEditionStatement",
# "reference",
# "corpusEditor"
+# "distributor"
#
# DATE:
# "pubDate",
@@ -324,10 +325,17 @@
};
if ($temp = $dom->at('fileDesc')) {
+ my $temp2;
+
if (my $availability = $temp->at('publicationStmt > availability')) {
- $temp = _squish $availability->all_text;
- $self->{S_availability} = $temp if $temp;
+ $temp2 = _squish $availability->all_text;
+ $self->{S_availability} = $temp2 if $temp2;
};
+
+ if (my $distributor = $temp->at('publicationStmt > distributor')) {
+ $temp2 = _squish $distributor->all_text;
+ $self->{A_distributor} = $temp2 if $temp2;
+ }
};
if ($temp = $dom->at('profileDesc > langUsage > language[id]')) {