summaryrefslogtreecommitdiff
path: root/Master/tlpkg/bin/tlpdb2container
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/bin/tlpdb2container')
-rwxr-xr-xMaster/tlpkg/bin/tlpdb2container11
1 files changed, 3 insertions, 8 deletions
diff --git a/Master/tlpkg/bin/tlpdb2container b/Master/tlpkg/bin/tlpdb2container
index 55662a3a36b..0de2713777b 100755
--- a/Master/tlpkg/bin/tlpdb2container
+++ b/Master/tlpkg/bin/tlpdb2container
@@ -25,24 +25,19 @@ use File::Path;
my $opt_all = 0;
our $mydir;
-my $opt_debug = 0;
my $opt_outputdir = "./archive";
my $opt_relative = 0;
my $help = 0;
+TeXLive::TLUtils::process_logging_options();
+
GetOptions("o|outputdir=s" => \$opt_outputdir,
"a|all!" => \$opt_all,
- "d|debug!" => \$opt_debug,
"r|relative!" => \$opt_relative,
"h|help|?" => \$help) or pod2usage(1);
pod2usage(-exitstatus => 0, -verbose => 2) if $help;
-if ($opt_debug) {
- $::LOGLEVELFILE = $::LOG_DDDEBUG;
- $::LOGLEVELTERMINAL = $::LOG_DDDEBUG;
-}
-
my $srcsplit = 0;
my $docsplit = 0;
my $type = "lzma";
@@ -68,7 +63,7 @@ sub main
if (($format eq "lzma") || ($format eq "zip")) {
$type = $format;
} else {
- tllog($::LOG_NORMAL, "unknown container format specified in 00texlive.config: $format\nIgnoring and continuing with $type!\n");
+ info("unknown container format specified in 00texlive.config: $format\nIgnoring and continuing with $type!\n");
}
# get list of packages.
my $last = "";