diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-12-02 17:14:23 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-12-02 17:14:23 +0000 |
commit | 77de0bfad055e0d6faec34b1291f50d076176984 (patch) | |
tree | 5afc63b8fab6f1c6776c8b91a2bed3b3881cd4b6 /perl-install | |
parent | 7bc600612894d999e7d84e496dae6d1c3144deef (diff) | |
download | drakx-backup-do-not-use-77de0bfad055e0d6faec34b1291f50d076176984.tar drakx-backup-do-not-use-77de0bfad055e0d6faec34b1291f50d076176984.tar.gz drakx-backup-do-not-use-77de0bfad055e0d6faec34b1291f50d076176984.tar.bz2 drakx-backup-do-not-use-77de0bfad055e0d6faec34b1291f50d076176984.tar.xz drakx-backup-do-not-use-77de0bfad055e0d6faec34b1291f50d076176984.zip |
- any::runlevel() doesnt need the prefix anymore
- fix use of any:runlevel()
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/Xconfig/various.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/Xconfig/various.pm b/perl-install/Xconfig/various.pm index f02c56c21..bb40b67e2 100644 --- a/perl-install/Xconfig/various.pm +++ b/perl-install/Xconfig/various.pm @@ -53,7 +53,7 @@ sub various { sub choose_xdm { my ($in, $auto) = @_; - my $xdm = $::isStandalone ? any::runlevel($::prefix) : 1; + my $xdm = $::isStandalone ? any::runlevel() == 5 : 1; if (!$auto || $::isStandalone) { $in->set_help('configureXxdm') if !$::isStandalone; @@ -62,7 +62,7 @@ sub choose_xdm { N("I can setup your computer to automatically start the graphical interface (XFree) upon booting. Would you like XFree to start when you reboot?"), $xdm) or return; } - any::runlevel($::prefix, $xdm ? 5 : 3); + any::runlevel($xdm ? 5 : 3); } sub tvout { |