diff options
| author | Carlos Garnacho <carlosg@gnome.org> | 2007-11-12 23:06:13 +0100 |
|---|---|---|
| committer | Carlos Garnacho <carlosg@gnome.org> | 2007-11-12 23:06:13 +0100 |
| commit | d2b11fa8558a4206f7093e26970786e30a45222d (patch) | |
| tree | 044a125af90c9b48f7c5955d2345d1f9c218baf6 | |
| parent | 986c01c53590cf7f096435feda3028d492907aae (diff) | |
Make --verbose work again
| -rw-r--r-- | Utils/Backend.pm | 4 | ||||
| -rw-r--r-- | Utils/Report.pm | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/Utils/Backend.pm b/Utils/Backend.pm index 100c3ac..878c1f7 100644 --- a/Utils/Backend.pm +++ b/Utils/Backend.pm @@ -90,7 +90,7 @@ sub print_platform_list sub set_with_param { my ($tool, $arg_name, $value) = @_; - + if ($$tool{$arg_name} ne "") { print STDERR "Error: You may specify --$arg_name only once.\n\n"; @@ -148,7 +148,7 @@ sub init elsif ($arg eq "--module" || $arg eq "-m") { &set_module (\%tool, shift @args); } elsif ($arg eq "--platform") { &set_dist (\%tool, shift @args); } elsif ($arg eq "--disable-shutdown") { &set_disable_shutdown (\%tool); } - elsif ($arg eq "--verbose" || $arg eq "-v") { &set_with_param (\%$tool, "do_verbose", 1); } + elsif ($arg eq "--verbose" || $arg eq "-v") { &set_with_param (\%tool, "do_verbose", 1); } elsif ($arg eq "--list-platforms") { &print_platform_list (\%tool) } else { diff --git a/Utils/Report.pm b/Utils/Report.pm index ece1548..ce66731 100644 --- a/Utils/Report.pm +++ b/Utils/Report.pm @@ -125,7 +125,7 @@ sub do_report $format = "$str\n"; $res = sprintf ($format, @args); - if ($Utils::Backend::do_verbose || + if ($Utils::Backend::tool{"do_verbose"} || $major eq "error" || $major eq "debug") { |