summaryrefslogtreecommitdiff
path: root/Master
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2017-11-11 07:54:13 +0000
committerNorbert Preining <preining@logic.at>2017-11-11 07:54:13 +0000
commit5dc224e1615426c46c049f66102c4386320b08d9 (patch)
tree551718c2e8feb093cffceb75a6086805ca22736b /Master
parent4daaf989ebd5bda2420b2d635bc9ed2a46645b44 (diff)
debug json timing: print mode and format time
git-svn-id: svn://tug.org/texlive/trunk@45749 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rwxr-xr-xMaster/texmf-dist/scripts/texlive/tlmgr.pl4
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm2
2 files changed, 2 insertions, 4 deletions
diff --git a/Master/texmf-dist/scripts/texlive/tlmgr.pl b/Master/texmf-dist/scripts/texlive/tlmgr.pl
index e74eff61c44..9437dff913f 100755
--- a/Master/texmf-dist/scripts/texlive/tlmgr.pl
+++ b/Master/texmf-dist/scripts/texlive/tlmgr.pl
@@ -1496,9 +1496,7 @@ sub action_info {
$endsec -= 1;
$endmsec += 1000000;
}
- print STDERR "start $startsec $startmsec\n";
- print STDERR "end $endsec $endmsec\n";
- print STDERR "duration ", $endsec - $startsec, ":", $endmsec - $startmsec, "\n";
+ print STDERR "JSON (", $TeXLive::TLUtils::jsonmode, ") generation took ", $endsec - $startsec, ".", substr($endmsec - $startmsec,0,2), " sec\n";
}
return ($ret);
}
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index 0b533475ce8..0ea884a0515 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -4185,7 +4185,7 @@ my $TLFalse = \$TLFalseValue;
bless $TLTrue, 'TLBOOLEAN';
bless $TLFalse, 'TLBOOLEAN';
-my $jsonmode = "";
+our $jsonmode = "";
=item C<True()>
=item C<False()>