summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xMaster/texmf/scripts/texlive/tlmgr.pl6
1 files changed, 4 insertions, 2 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl
index d2c33ce2f57..35791dbf557 100755
--- a/Master/texmf/scripts/texlive/tlmgr.pl
+++ b/Master/texmf/scripts/texlive/tlmgr.pl
@@ -1549,7 +1549,9 @@ sub machine_line {
$lrev ||= "-";
$rrev ||= "-";
$flag ||= "?";
- my $str = "$pkg\t$flag\t$lrev\t$rrev\t" . join("\t", @args) . "\n";
+ my $str = "$pkg\t$flag\t$lrev\t$rrev\t";
+ $str .= join("\t", @args) if (@args);
+ $str .= "\n";
return($str) if $ret;
print $str;
}
@@ -1888,7 +1890,7 @@ sub action_update {
my $rev = $pkg->revision;
if ($opts{"list"}) {
if ($::machinereadable) {
- machine_line($p, $FLAG_REMOVE, $rev, "-", "-");
+ machine_line($p, $FLAG_REMOVE, $rev, "-", "-", "-");
} else {
info("$p: local: $rev, source: <absent> (auto-remove)\n");
}