diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/NEWS | 1 | ||||
| -rw-r--r-- | perl-install/bootloader.pm | 2 |
2 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 25817e105..311e64e1a 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,3 +1,4 @@ +- fix invocation of grub-md5-crypt from within installer (#57461) - add support for asturian (#56990) - drakboot: o fix crypted password detection diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index be7f5bebc..37f7722ca 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -1679,7 +1679,7 @@ sub crypt_grub_password { require IPC::Open2; local $ENV{LC_ALL} = 'C'; my ($his_out, $his_in); - my $pid = IPC::Open2::open2($his_out, $his_in, "$::prefix/sbin/grub-md5-crypt"); + my $pid = IPC::Open2::open2($his_out, $his_in, "$::prefix/sbin/grub-md5-crypt", $::prefix ? "--grub-shell=$::prefix/sbin/grub" : ()); my ($line, $res); while (sysread($his_out, $line, 100)) { |