diff options
Diffstat (limited to 'perl-install/install2.pm')
| -rw-r--r-- | perl-install/install2.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm index 93d5347e7..cd2c92d4c 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -220,7 +220,7 @@ sub selectMouse { #------------------------------------------------------------------------------ sub setupSCSI { - my ($clicked) = $_[0]; + my ($clicked) = @_; $o->{autoSCSI} ||= $::beginner; $o->setupSCSI($o->{autoSCSI} && !$clicked, $clicked); @@ -228,7 +228,7 @@ sub setupSCSI { #------------------------------------------------------------------------------ sub selectKeyboard { - my ($clicked) = $_[0]; + my ($clicked) = @_; return if !$o->{isUpgrade} && $::beginner && !$clicked; @@ -424,13 +424,13 @@ sub setupBootloader { } #------------------------------------------------------------------------------ sub configureX { - my ($clicked) = $_[0]; + my ($clicked) = @_; #- done here and also at the end of install2.pm, just in case... fs::write($o->{prefix}, $o->{fstab}, $o->{manualFstab}, $o->{useSupermount}); modules::write_conf($o->{prefix}); - $o->configureX if pkgs::packageFlagInstalled(pkgs::packageByName($o->{packages}, 'XFree86')) && !$o->{X}{disabled} || $clicked; + $o->configureX($clicked) if pkgs::packageFlagInstalled(pkgs::packageByName($o->{packages}, 'XFree86')) && !$o->{X}{disabled} || $clicked; } #------------------------------------------------------------------------------ sub generateAutoInstFloppy { $o->generateAutoInstFloppy } |