diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-02-01 19:19:21 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-02-01 19:19:21 +0000 |
commit | 30e2a32f1b26b93d5d9aed310cb9be6f047a27d3 (patch) | |
tree | a9d4fd84d4cacf3b16d3a4d2cdeee15db1eec1f6 /urpm/args.pm | |
parent | 6ffec4be6a0cf15824a48f639d6fe2a32de9d508 (diff) | |
download | urpmi-30e2a32f1b26b93d5d9aed310cb9be6f047a27d3.tar urpmi-30e2a32f1b26b93d5d9aed310cb9be6f047a27d3.tar.gz urpmi-30e2a32f1b26b93d5d9aed310cb9be6f047a27d3.tar.bz2 urpmi-30e2a32f1b26b93d5d9aed310cb9be6f047a27d3.tar.xz urpmi-30e2a32f1b26b93d5d9aed310cb9be6f047a27d3.zip |
perl_checker cleanups
Diffstat (limited to 'urpm/args.pm')
-rw-r--r-- | urpm/args.pm | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/urpm/args.pm b/urpm/args.pm index 5fe00aea..b4084ae6 100644 --- a/urpm/args.pm +++ b/urpm/args.pm @@ -363,10 +363,9 @@ my %options_spec = ( ); -eval -{ +eval { #require urpm::dudf; - $options_spec{'urpmi'}{'force-dudf'} = \$::force_dudf; + $options_spec{urpmi}{'force-dudf'} = \$::force_dudf; }; @@ -456,7 +455,7 @@ foreach my $k ("f", "z", "update", "norebuild!", "probe-rpms", '<>') foreach my $k ("no-md5sum") { - $options_spec{'urpmi'}{$k} = $options_spec{'urpmi.addmedia'}{$k} = $options_spec{'urpmi.update'}{$k}; + $options_spec{urpmi}{$k} = $options_spec{'urpmi.addmedia'}{$k} = $options_spec{'urpmi.update'}{$k}; } foreach my $k ("a", '<>') { @@ -483,7 +482,7 @@ sub set_root { } } -sub set_verbosity { +sub set_verbosity() { $options{verbose} >= 0 or $urpm->{info} = sub {}; $options{verbose} > 0 or $urpm->{log} = sub {}; } |