summaryrefslogtreecommitdiff
path: root/Master
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2019-05-16 10:12:50 +0000
committerNorbert Preining <preining@logic.at>2019-05-16 10:12:50 +0000
commite106e92c7ccca608ed368f78374b5d40e0abe7b2 (patch)
tree4dfb23e844bd1ef0ba543aebaad115bacb75f91c /Master
parent49ebf1355a42495493318b128013f9d6009cc298 (diff)
import tlmgr repository status output
git-svn-id: svn://tug.org/texlive/trunk@51140 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rwxr-xr-xMaster/texmf-dist/scripts/texlive/tlmgr.pl10
1 files changed, 8 insertions, 2 deletions
diff --git a/Master/texmf-dist/scripts/texlive/tlmgr.pl b/Master/texmf-dist/scripts/texlive/tlmgr.pl
index 48ea6683d5a..45400e016f4 100755
--- a/Master/texmf-dist/scripts/texlive/tlmgr.pl
+++ b/Master/texmf-dist/scripts/texlive/tlmgr.pl
@@ -4550,12 +4550,18 @@ sub action_repository {
init_tlmedia_or_die();
}
if (!$remotetlpdb->is_virtual) {
- print "main: ", $remotetlpdb->location, ", verification status: ", $remotetlpdb->is_verified, "\n";
+ my $verstat = $remotetlpdb->verification_status;
+ print "main ", $remotetlpdb->location, " ",
+ ($::machinereadable ? "$verstat " : ""),
+ $VerificationStatusDescription{$verstat}, "\n";
return ($F_OK);
} else {
for my $t ($remotetlpdb->virtual_get_tags()) {
my $tlpdb = $remotetlpdb->virtual_get_tlpdb($t);
- print "$t: ", $tlpdb->location, ", verification status: ", $tlpdb->is_verified, "\n";
+ my $verstat = $tlpdb->verification_status;
+ print "$t ", $tlpdb->location, " ",
+ ($::machinereadable ? "$verstat " : ""),
+ $VerificationStatusDescription{$verstat}, "\n";
}
return($F_OK);
}