From 25cf105294b26a222c12d6649e8c00eb9fd78b6f Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Sun, 24 Apr 2016 05:25:14 +0000 Subject: don't disturb machine readable output git-svn-id: svn://tug.org/texlive/trunk@40719 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/scripts/texlive/tlmgr.pl | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) (limited to 'Master') diff --git a/Master/texmf-dist/scripts/texlive/tlmgr.pl b/Master/texmf-dist/scripts/texlive/tlmgr.pl index 8ca99dabb80..725e253a818 100755 --- a/Master/texmf-dist/scripts/texlive/tlmgr.pl +++ b/Master/texmf-dist/scripts/texlive/tlmgr.pl @@ -5862,9 +5862,12 @@ sub _init_tlmedia { # this "location-url" line should not be changed since GUI programs # depend on it: - print "location-url\t$location\n" if $::machinereadable; - info("$prg: package repository $location (" . - ($remotetlpdb->is_verified ? "" : "not ") . "verified)\n"); + if ($::machinereadable) { + print "location-url\t$location\n"; + } else { + info("$prg: package repository $location (" . + ($remotetlpdb->is_verified ? "" : "not ") . "verified)\n"); + } return 1; } -- cgit v1.2.3