summaryrefslogtreecommitdiffstats
path: root/perl-install/install2.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-09-27 00:39:45 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-09-27 00:39:45 +0000
commite1d7fa386efb725ecd526ea24bebcf56cf4b1296 (patch)
tree0064ad4c601350766f8e5856c6344285e3f3779a /perl-install/install2.pm
parent9bf316fa134a1c39ef18d0f007bf7aac21d4a487 (diff)
downloaddrakx-backup-do-not-use-e1d7fa386efb725ecd526ea24bebcf56cf4b1296.tar
drakx-backup-do-not-use-e1d7fa386efb725ecd526ea24bebcf56cf4b1296.tar.gz
drakx-backup-do-not-use-e1d7fa386efb725ecd526ea24bebcf56cf4b1296.tar.bz2
drakx-backup-do-not-use-e1d7fa386efb725ecd526ea24bebcf56cf4b1296.tar.xz
drakx-backup-do-not-use-e1d7fa386efb725ecd526ea24bebcf56cf4b1296.zip
no_comment
Diffstat (limited to 'perl-install/install2.pm')
-rw-r--r--perl-install/install2.pm8
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 }