diff options
Diffstat (limited to 'perl-install/install_any.pm')
| -rw-r--r-- | perl-install/install_any.pm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index bfb568b2f..607659ef8 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -1123,7 +1123,12 @@ sub install_steps::do_pkgs { sub install { my ($do, @l) = @_; - $do->{o}->pkg_install(@l); + if ($::testing) { + log::l("i would install packages " . join(' ', @l)); + return 1; + } else { + $do->{o}->pkg_install(@l); + } } sub ensure_is_installed { |