summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLPOBJ.pm
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2018-01-24 04:13:22 +0000
committerNorbert Preining <preining@logic.at>2018-01-24 04:13:22 +0000
commitf5df623a3857e1b2889f1bc56862c9cd34d341f4 (patch)
treea51356e34155dab8515ba21fa489641cbd921067 /Master/tlpkg/TeXLive/TLPOBJ.pm
parent9eaa775cf46f42eee783f48b085b765d08cf3296 (diff)
warn if *containermd5 is used
git-svn-id: svn://tug.org/texlive/trunk@46422 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPOBJ.pm')
-rw-r--r--Master/tlpkg/TeXLive/TLPOBJ.pm21
1 files changed, 18 insertions, 3 deletions
diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm
index 82eaf531ce4..c0b9b4c74b8 100644
--- a/Master/tlpkg/TeXLive/TLPOBJ.pm
+++ b/Master/tlpkg/TeXLive/TLPOBJ.pm
@@ -1262,17 +1262,32 @@ sub doccontainersize {
sub containermd5 {
my $self = shift;
if (@_) { $self->{'containermd5'} = shift }
- return ( defined($self->{'containermd5'}) ? $self->{'containermd5'} : "" );
+ if (defined($self->{'containermd5'})) {
+ return ($self->{'containermd5'});
+ } else {
+ tlwarn("TLPOBJ: MD5 sums are no longer supported, please adapt your code!\n");
+ return ("");
+ }
}
sub srccontainermd5 {
my $self = shift;
if (@_) { $self->{'srccontainermd5'} = shift }
- return ( defined($self->{'srccontainermd5'}) ? $self->{'srccontainermd5'} : "" );
+ if (defined($self->{'srccontainermd5'})) {
+ return ($self->{'srccontainermd5'});
+ } else {
+ tlwarn("TLPOBJ: MD5 sums are no longer supported, please adapt your code!\n");
+ return ("");
+ }
}
sub doccontainermd5 {
my $self = shift;
if (@_) { $self->{'doccontainermd5'} = shift }
- return ( defined($self->{'doccontainermd5'}) ? $self->{'doccontainermd5'} : "" );
+ if (defined($self->{'doccontainermd5'})) {
+ return ($self->{'doccontainermd5'});
+ } else {
+ tlwarn("TLPOBJ: MD5 sums are no longer supported, please adapt your code!\n");
+ return ("");
+ }
}
sub containerchecksum {
my $self = shift;