summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLPOBJ.pm
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2018-08-31 03:41:21 +0000
committerNorbert Preining <preining@logic.at>2018-08-31 03:41:21 +0000
commit6932d0a2cd30904e3502d9893f7014958a762f26 (patch)
tree76c31cbf43b92a5e220c3327cb93240fd439ea4c /Master/tlpkg/TeXLive/TLPOBJ.pm
parenta4d6397e21499768cd1e3d88fd06aee6db0176d5 (diff)
include contact from TeX Catalogue in tlpdb
git-svn-id: svn://tug.org/texlive/trunk@48521 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPOBJ.pm')
-rw-r--r--Master/tlpkg/TeXLive/TLPOBJ.pm5
1 files changed, 5 insertions, 0 deletions
diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm
index 238dd94f393..88aef34b345 100644
--- a/Master/tlpkg/TeXLive/TLPOBJ.pm
+++ b/Master/tlpkg/TeXLive/TLPOBJ.pm
@@ -850,6 +850,11 @@ sub update_from_catalogue {
if (@{$entry->topics}) {
$self->cataloguedata->{'topics'} = "@{$entry->topics}";
}
+ if (%{$entry->contact}) {
+ for my $k (keys %{$entry->contact}) {
+ $self->cataloguedata->{"contact-$k"} = $entry->contact->{$k};
+ }
+ }
#if (defined($entry->texlive)) {
# $self->cataloguedata->{'texlive'} = $entry->texlive;
#}