diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2001-03-14 19:23:45 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2001-03-14 19:23:45 +0000 |
commit | fe62cdfbd7907aefd400728f387b6963e38a9ee4 (patch) | |
tree | 797d843a7c09ad5b32844fa6584b6a4bbce74681 /perl-install | |
parent | 2060ec3fde6da3ce94fa130a6365b6af04cd4815 (diff) | |
download | drakx-backup-do-not-use-fe62cdfbd7907aefd400728f387b6963e38a9ee4.tar drakx-backup-do-not-use-fe62cdfbd7907aefd400728f387b6963e38a9ee4.tar.gz drakx-backup-do-not-use-fe62cdfbd7907aefd400728f387b6963e38a9ee4.tar.bz2 drakx-backup-do-not-use-fe62cdfbd7907aefd400728f387b6963e38a9ee4.tar.xz drakx-backup-do-not-use-fe62cdfbd7907aefd400728f387b6963e38a9ee4.zip |
fix for perl2fcalls
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/bootlook.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/bootlook.pm b/perl-install/bootlook.pm index 1956eadcb..3705de154 100644 --- a/perl-install/bootlook.pm +++ b/perl-install/bootlook.pm @@ -47,7 +47,7 @@ if ($::isEmbedded) { # $path_to_pixmaps = "./pixmaps/"; } -my $in = vnew interactive('su'); +my $in = interactive->vnew('su'); local $_ = join '', @ARGV; /-h/ and die _("no help implemented yet.\n"); @@ -349,7 +349,7 @@ sub updateAutologin { my ($usern,$deskt)=($user_combo->entry->get_text(), $desktop_combo->entry->get_text()); - if($x_yes_button->get_active() ) { + if ($x_yes_button->get_active() ) { set_autologin('',$usern,$deskt); } else { set_autologin('',undef) if ($x_no_button->get_active()); |