diff options
Diffstat (limited to 'perl-install/install2.pm')
| -rw-r--r-- | perl-install/install2.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm index ce08f0f70..190b529ab 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -288,7 +288,7 @@ sub addUser { sub createBootdisk { my ($clicked, $ent_number, $auto) = @_; modules::write_conf($o->{prefix}); - installStepsCall($o, $auto, 'createBootdisk', $ent_number == 1); + installStepsCall($o, $auto, 'createBootdisk', $ent_number == 1, $clicked); } #------------------------------------------------------------------------------ @@ -299,7 +299,7 @@ sub setupBootloader { modules::write_conf($o->{prefix}); installStepsCall($o, $auto, 'setupBootloaderBefore') if $ent_number == 1; - installStepsCall($o, $auto, 'setupBootloader', $ent_number - 1); + installStepsCall($o, $auto, 'setupBootloader', $ent_number-1 + $clicked*2); #- gore :-( local $ENV{DRAKX_PASSWORD} = $o->{bootloader}{password}; local $ENV{DURING_INSTALL} = 1; |