diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2016-06-06 11:12:04 +0200 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2016-06-06 11:12:04 +0200 |
| commit | 8847eda6f7f8aaad07931290f1a37a5e44f7a426 (patch) | |
| tree | ecb29e134cc4fd3e7e4a2f2a3f147baa80b257bc /perl-install/any.pm | |
| parent | 9e602c73415f40b86e8ee7561940b8ee7cb5c1e6 (diff) | |
| download | drakx-8847eda6f7f8aaad07931290f1a37a5e44f7a426.tar drakx-8847eda6f7f8aaad07931290f1a37a5e44f7a426.tar.gz drakx-8847eda6f7f8aaad07931290f1a37a5e44f7a426.tar.bz2 drakx-8847eda6f7f8aaad07931290f1a37a5e44f7a426.tar.xz drakx-8847eda6f7f8aaad07931290f1a37a5e44f7a426.zip | |
enable to (un)install os-prober
Diffstat (limited to 'perl-install/any.pm')
| -rw-r--r-- | perl-install/any.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index e71132b69..8ca9553db 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -625,6 +625,7 @@ sub setupBootloader__grub2 { require network::network; #- to list network profiles my $vga = Xconfig::resolution_and_depth::from_bios($b->{vga}); + my $os_prober = run_program::rooted($::prefix, 'rpm', '-q', 'os-prober'); my $res = $in->ask_from_( { @@ -636,12 +637,18 @@ sub setupBootloader__grub2 { { label => N("Append"), val => \$append }, { label => N("Video mode"), val => \$vga, list => [ '', Xconfig::resolution_and_depth::bios_vga_modes() ], format => \&Xconfig::resolution_and_depth::to_string, advanced => 1 }, + { text => N("Probe Foreign OS"), val => \$os_prober, type => 'bool' }, ]); if ($res) { $b->{entries} = $b2->{entries}; $b->{default} = $default; $b->{vga} = ref($vga) ? $vga->{bios} : $vga; first(@{$b->{entries}})->{append} = $append; + if ($os_prober) { + $in->do_pkgs->ensure_is_installed('os-prober', '/usr/bin/os-prober'); + } else { + $in->do_pkgs->remove('os-prober'); + } 1; } else { ''; |