diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2020-03-05 15:48:37 +0100 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2020-03-05 18:41:31 +0100 |
| commit | 454c11f17a6955ff6d8601880fc42fc498f7343b (patch) | |
| tree | 63c71e89db353684fdc90aaa0882559cd11d3308 /urpm/install.pm | |
| parent | bfc4d3f45be2e1857b712710dd8cb01a7cbfebb8 (diff) | |
| download | urpmi-454c11f17a6955ff6d8601880fc42fc498f7343b.tar urpmi-454c11f17a6955ff6d8601880fc42fc498f7343b.tar.gz urpmi-454c11f17a6955ff6d8601880fc42fc498f7343b.tar.bz2 urpmi-454c11f17a6955ff6d8601880fc42fc498f7343b.tar.xz urpmi-454c11f17a6955ff6d8601880fc42fc498f7343b.zip | |
add support for --reinstall
Needs perl-URPM-5.25 (it won't work with rpm < 4.12.x)
Diffstat (limited to 'urpm/install.pm')
| -rw-r--r-- | urpm/install.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/urpm/install.pm b/urpm/install.pm index 68f75a2c..e0d22441 100644 --- a/urpm/install.pm +++ b/urpm/install.pm @@ -230,7 +230,8 @@ sub _schedule_packages { ($true_rpm, $true_pkg) = _apply_delta_rpm($urpm, $mode->{$_}, $mode, $pkg); push @produced_deltas, ($mode->{$_} = $true_rpm); #- fix path } - if ($trans->add($true_pkg || $pkg, update => $update, + if ($urpm->{options}{reinstall} ? $trans->addReinstall($true_pkg || $pkg) : + $trans->add($true_pkg || $pkg, update => $update, $options{excludepath} ? (excludepath => [ split /,/, $options{excludepath} ]) : ())) { $urpm->{debug} and $urpm->{debug}( sprintf('trans: scheduling %s of %s (id=%d, file=%s)', |