diff options
author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-10-27 12:13:27 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-10-27 12:13:27 +0000 |
commit | 13b713dc4315f11f9408f7c1995b1fd03a75c008 (patch) | |
tree | a125cba03454d8a56c9d7dd0af4eed8d99d8ee6b | |
parent | b85668183bfbd4a5ecec72d48827de63c491ff01 (diff) | |
download | urpmi-13b713dc4315f11f9408f7c1995b1fd03a75c008.tar urpmi-13b713dc4315f11f9408f7c1995b1fd03a75c008.tar.gz urpmi-13b713dc4315f11f9408f7c1995b1fd03a75c008.tar.bz2 urpmi-13b713dc4315f11f9408f7c1995b1fd03a75c008.tar.xz urpmi-13b713dc4315f11f9408f7c1995b1fd03a75c008.zip |
Add API to have defaults in urpm::args
-rw-r--r-- | urpm/args.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/urpm/args.pm b/urpm/args.pm index 89cf00a5..b41e24fe 100644 --- a/urpm/args.pm +++ b/urpm/args.pm @@ -362,6 +362,9 @@ foreach my $k ("help|h", "wget", "curl", "proxy=s", "proxy-user=s", "c", "f", "z sub parse_cmdline { my %args = @_; $urpm = $args{urpm}; + for my $k (keys %{$args{defaults} || {}}) { + $options{$k} = $args{defaults}{$k}; + } GetOptions(%{$options_spec{$tool}}); } |