diff options
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPDB.pm')
| -rw-r--r-- | Master/tlpkg/TeXLive/TLPDB.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Master/tlpkg/TeXLive/TLPDB.pm b/Master/tlpkg/TeXLive/TLPDB.pm index 989e19f054c..c2368e75303 100644 --- a/Master/tlpkg/TeXLive/TLPDB.pm +++ b/Master/tlpkg/TeXLive/TLPDB.pm @@ -130,7 +130,7 @@ sub new { verified => 0 }; my $verify = defined($params{'verify'}) ? $params{'verify'} : 0; - ddebug("TLPDB new: verify = $verify\n"); + ddebug("TLPDB new (root=$self->{root}): verify=$verify\n"); $_listdir = $params{'listdir'} if defined($params{'listdir'}); bless $self, $class; if (defined($params{'tlpdbfile'})) { @@ -370,7 +370,7 @@ sub from_file { } elsif ($r == 2) { tldie("$0: signature verification error of $tlpdbfile from $path: $m\n"); } elsif ($r == -1) { - tldie("$0: connection problems, cannot download: $m\n"); + tldie("$0: cannot download: $m\n"); } elsif ($r == -2) { debug("$0: remote database checksum is not signed, continuing anyway!\n"); $self->verification_status("not signed"); @@ -396,7 +396,7 @@ sub from_file { } elsif ($r == 2) { tldie("$0: signature verification error of $path from $path: $m\n"); } elsif ($r == -1) { - tldie("$0: connection problems, cannot download: $m\n"); + tldie("$0: cannot download: $m\n"); } elsif ($r == -2) { debug("$0: remote database checksum is not signed, continuing anyway!\n"); $self->verification_status("not signed"); |