summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-07-10 10:35:35 +0000
committerNorbert Preining <preining@logic.at>2008-07-10 10:35:35 +0000
commit8e85d1ab2ab6ba2ad123e83ac4e16a3d8153b1df (patch)
tree8267bde6966588cd8b3d046425b6fb06f00e4090
parent3726af04a35d7fbf92f6da3ecef2b54d238f27f6 (diff)
tlmgr/tlmgrgui: forgot to commit the part of process_logging_options support
for tlmgrgui, here it is. git-svn-id: svn://tug.org/texlive/trunk@9428 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-xMaster/texmf/scripts/texlive/tlmgrgui/tlmgrgui-real.pl11
1 files changed, 7 insertions, 4 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui-real.pl b/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui-real.pl
index 4259fc8914f..511b6608313 100755
--- a/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui-real.pl
+++ b/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui-real.pl
@@ -136,7 +136,6 @@ sub ___ ($) {
}
my $opt_location;
-my $opt_debug = 0;
my $opt_netarchive;
my $opt_diskarchive;
my $opt_screen;
@@ -145,6 +144,8 @@ our $opt_force = 0;
our $opt_nodepends = 0;
my $opt_lang;
+TeXLive::TLUtils::process_logging_options();
+
GetOptions("location=s" => \$opt_location,
"netarchive=s" => \$NetArchive,
"diskarchive=s" => \$DiskArchive,
@@ -153,7 +154,7 @@ GetOptions("location=s" => \$opt_location,
"load" => \$opt_load,
"lang=s" => \$opt_lang,
"no-depends" => \$opt_nodepends,
- "debug!" => \$opt_debug) or die("Unsupported argument!");
+ ) or die("Unsupported argument!");
if (defined($opt_lang)) {
$LANG = $opt_lang;
@@ -164,7 +165,7 @@ if (defined($opt_lang)) {
if ($foo) {
$LANG = $foo;
} else {
- debug("Didn't get any usuful code from reg_country: $foo...\n");
+ debug("Didn't get any useful code from reg_country: $foo...\n");
}
} else {
# we load POSIX and locale stuff
@@ -205,6 +206,7 @@ if (defined($LANG) && (-r "$Master/texmf/scripts/texlive/tlmgrgui/lang/$LANG"))
our @update_function_list;
our $debugmode = 0;
+$debugmode = 1 if ($::opt_verbosity > 0);
our $mw = MainWindow->new(-title => "tlmgr 2008");
$mw->withdraw;
@@ -466,7 +468,8 @@ sub install_selected_packages {
my @execlist;
push @execlist, "tlmgr", "--location", "$location";
if ($debugmode) {
- push @execlist, "-v";
+ push @execlist, "-v" if ($::opt_verbosity > 0);
+ push @execlist, "-v" if ($::opt_verbosity > 1);
}
push @execlist, "install";
if ($opt_nodepends) {