diff options
-rw-r--r-- | perl-install/install_any.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 8edbe0573..ae0281d51 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -1176,12 +1176,12 @@ sub install { sub ensure_is_installed { my ($do, $pkg, $file, $auto) = @_; - if (! -e $file) { + if (! -e "$::prefix$file") { $do->{o}->ask_okcancel('', _("The package %s needs to be installed. Do you want to install it?", $pkg), 1) or return if !$auto; $do->{o}->do_pkgs->install($pkg); } - if (! -e $file) { + if (! -e "$::prefix$file") { $do->{o}->ask_warn('', _("Mandatory package %s is missing", $pkg)); return; } |