diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-03-17 21:39:40 +0100 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-03-17 21:39:40 +0100 |
| commit | cf9265e5981c5fe24c9e654935600d2348e2ba82 (patch) | |
| tree | 2c9fb55e0788f229861748be91d1b9a519768113 /perl-install | |
| parent | 18d2440c70b959da39cb67e5be482d453d3c2f72 (diff) | |
| download | drakx-cf9265e5981c5fe24c9e654935600d2348e2ba82.tar drakx-cf9265e5981c5fe24c9e654935600d2348e2ba82.tar.gz drakx-cf9265e5981c5fe24c9e654935600d2348e2ba82.tar.bz2 drakx-cf9265e5981c5fe24c9e654935600d2348e2ba82.tar.xz drakx-cf9265e5981c5fe24c9e654935600d2348e2ba82.zip | |
add 'deploops' option for debugging (mga#15350)
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install/NEWS | 1 | ||||
| -rw-r--r-- | perl-install/install/install2.pm | 1 | ||||
| -rw-r--r-- | perl-install/install/pkgs.pm | 1 |
3 files changed, 3 insertions, 0 deletions
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 1bd026a92..681c4d833 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,4 +1,5 @@ - fix mis-detecting some mobile broadband modems (mga#12492) +- add 'deploops' option for debugging (mga#15350) Version 16.67 - 5 March 2015 diff --git a/perl-install/install/install2.pm b/perl-install/install/install2.pm index 9080d0cb9..2e50db4d0 100644 --- a/perl-install/install/install2.pm +++ b/perl-install/install/install2.pm @@ -556,6 +556,7 @@ sub parse_args { # urpmi options: debug_urpmi => sub { $o->{debug_urpmi} = 1 }, + deploops => sub { $o->{deploops} = 1 }, justdb => sub { $o->{justdb} = 1 }, 'tune-rpm' => sub { $o->{'tune-rpm'} = 'all' }, diff --git a/perl-install/install/pkgs.pm b/perl-install/install/pkgs.pm index 75f4f4cea..fca5b6c19 100644 --- a/perl-install/install/pkgs.pm +++ b/perl-install/install/pkgs.pm @@ -422,6 +422,7 @@ sub empty_packages { $packages->{options}{'priority-upgrade'} = undef; # log $trans->add() faillure; FIXME: should we override *urpm::msg::sys_log? $packages->{debug} = $packages->{debug_URPM} = \&log::l; + $urpm::args::options{deploops} = $::o->{deploops}; $packages->{options}{'curl-options'} = $::o->{curl_options} if $::o->{curl_options}; $packages; |