diff options
| author | Karl Berry <karl@freefriends.org> | 2018-07-05 18:05:05 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2018-07-05 18:05:05 +0000 |
| commit | c0df6a1395f65645200563c3586fb2c4b73e0630 (patch) | |
| tree | 10fe86145cf7ce86806e3f0654773c8a9a0a60ff /Master/tlpkg/bin/tl-update-tlpdb | |
| parent | f74e45dee03fbaac6d3286f99943105b3a9fd2ba (diff) | |
TLPSRC.pm: check for unexpanded variables and more duplicate directives;
simplify case statement handling lines.
TLTREE.pm (get_matching_files): propagate warnings from the eval,
for the sake of undefined variables.
TLPDB.pm: doc.
tl-update-tlpdb: distinguish $tlpdb->writeout from $tlpdb->save in msg.
git-svn-id: svn://tug.org/texlive/trunk@48144 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/bin/tl-update-tlpdb')
| -rwxr-xr-x | Master/tlpkg/bin/tl-update-tlpdb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/tlpkg/bin/tl-update-tlpdb b/Master/tlpkg/bin/tl-update-tlpdb index 5415d7d1cbe..a43baa6e08e 100755 --- a/Master/tlpkg/bin/tl-update-tlpdb +++ b/Master/tlpkg/bin/tl-update-tlpdb @@ -445,13 +445,13 @@ sub finish { if ($opt_output) { if (open(OUT, ">$opt_output")) { $tlpdb->writeout(\*OUT); - info ("$progname: wrote $pkgcount packages to $opt_output.\n"); + info ("$progname: output $pkgcount packages to $opt_output.\n"); } else { tldie ("$progname: open(>$opt_output) failed: $!"); } } else { $tlpdb->save; - info ("$progname: wrote $pkgcount packages to " . $tlpdb->root . ".\n"); + info ("$progname: saved $pkgcount packages to " . $tlpdb->root . ".\n"); } exit (0); } |