diff options
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPOBJ.pm')
-rw-r--r-- | Master/tlpkg/TeXLive/TLPOBJ.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm index bbed060353e..8cb9b6d4d79 100644 --- a/Master/tlpkg/TeXLive/TLPOBJ.pm +++ b/Master/tlpkg/TeXLive/TLPOBJ.pm @@ -171,7 +171,8 @@ sub from_fh { $self->{$cmd} = $arg; } elsif ($cmd eq 'containerchecksum' || $cmd eq 'srccontainerchecksum' || $cmd eq 'doccontainerchecksum') { - $arg =~ /^[a-f0-9]{$ChecksumLength}$/ or die "Invalid checksum value: $line!"; + $arg =~ /^[a-f0-9]{$TeXLive::TLConfig::ChecksumLength}$/ + or die "Invalid checksum value: $line!"; $self->{$cmd} = $arg; } elsif ($cmd eq 'name') { $arg =~ /^([-.\w]+)$/ or die("Invalid name: $line!"); |