diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-12-29 12:06:39 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-12-29 12:06:39 +0000 |
| commit | aa5858b87ab4794513743166a4a6f14cee0d0383 (patch) | |
| tree | 5c4e21be32a0cbe6f5c98ea8e7eaee17c3b6668c /perl-install/bootlook.pm | |
| parent | 8dd9ef7b5577c53d34568c32541edd17fe7400f5 (diff) | |
| download | drakx-backup-do-not-use-aa5858b87ab4794513743166a4a6f14cee0d0383.tar drakx-backup-do-not-use-aa5858b87ab4794513743166a4a6f14cee0d0383.tar.gz drakx-backup-do-not-use-aa5858b87ab4794513743166a4a6f14cee0d0383.tar.bz2 drakx-backup-do-not-use-aa5858b87ab4794513743166a4a6f14cee0d0383.tar.xz drakx-backup-do-not-use-aa5858b87ab4794513743166a4a6f14cee0d0383.zip | |
move any::runlevel() to Xconfig::various::runlevel()
Diffstat (limited to 'perl-install/bootlook.pm')
| -rw-r--r-- | perl-install/bootlook.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/bootlook.pm b/perl-install/bootlook.pm index 6021f117a..51f300475 100644 --- a/perl-install/bootlook.pm +++ b/perl-install/bootlook.pm @@ -25,6 +25,7 @@ use Config; use POSIX; use interactive; use standalone; +use Xconfig::various; use any; use bootloader; use fs; @@ -42,7 +43,7 @@ my @usernames; parse_etc_passwd(); my $no_bootsplash; -my $x_mode = any::runlevel() == 5; +my $x_mode = Xconfig::various::runlevel() == 5; my $a_mode = -e "/etc/aurora/Monitor" ? 1 : 0; my $auto_mode = any::get_autologin(); my $inmain = 0; @@ -332,7 +333,7 @@ Click on Configure to launch the setup wizard.", $lilogrub), ) ), gtkadd(gtkset_layout(new Gtk2::HButtonBox, 'end'), - gtksignal_connect(new Gtk2::Button(N("OK")), clicked => sub { any::runlevel($x_mode ? 5 : 3); updateAutologin(); updateAurora(); $::isEmbedded ? kill('USR1',$::CCPID) : Gtk2->exit(0) }), + gtksignal_connect(new Gtk2::Button(N("OK")), clicked => sub { Xconfig::various::runlevel($x_mode ? 5 : 3); updateAutologin(); updateAurora(); $::isEmbedded ? kill('USR1',$::CCPID) : Gtk2->exit(0) }), gtksignal_connect(new Gtk2::Button(N("Cancel")), clicked => sub { $::isEmbedded ? kill('USR1', $::CCPID) : Gtk2->exit(0) }) ) ) |