summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2017-08-11 05:09:53 +0000
committerNorbert Preining <preining@logic.at>2017-08-11 05:09:53 +0000
commitf29e4020ca7c40be095b4cbf6c2b434a487a8391 (patch)
treee0b8e018dcfb5d3e0dfa33c3fe16119f07a66292
parent0d6a47dd55e90359afe50b6652829136d1d3d364 (diff)
remove some output in machine readable mode
git-svn-id: svn://tug.org/texlive/trunk@45017 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-xMaster/texmf-dist/scripts/texlive/tlmgr.pl8
1 files changed, 6 insertions, 2 deletions
diff --git a/Master/texmf-dist/scripts/texlive/tlmgr.pl b/Master/texmf-dist/scripts/texlive/tlmgr.pl
index 4bee9c9d2d5..e3e1161892b 100755
--- a/Master/texmf-dist/scripts/texlive/tlmgr.pl
+++ b/Master/texmf-dist/scripts/texlive/tlmgr.pl
@@ -3476,7 +3476,7 @@ sub action_update {
# warn if nothing is updated. Unless they said --self, in which case
# we've already reported it.
if (!(@new || @updated) && ! $opts{"self"}) {
- info("$prg: no updates available\n");
+ info("$prg: no updates available\n") if (!$::machinereadable);
if ($remotetlpdb->media ne "NET"
&& $remotetlpdb->media ne "virtual"
&& !$opts{"dry-run"}
@@ -6314,7 +6314,11 @@ END_NO_CHECKSUMS
$remotetlpdb->virtual_pinning($pinfile);
# this "location-url" line should not be changed since GUI programs
# depend on it:
- print "location-url\t$locstr\n" if $::machinereadable;
+ if ($::machinereadable) {
+ print "location-url\t$locstr\n";
+ return 1;
+ }
+ # from here on only in non-machine-readable mode!
info("$prg: package repositories\n");
my $verstat = "";
if (!$remotetlpdb->virtual_get_tlpdb('main')->is_verified) {