diff options
author | Francois Pons <fpons@mandriva.com> | 2002-08-09 18:45:41 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2002-08-09 18:45:41 +0000 |
commit | 0722d266abba248fcf973a18e0fec1ffdc91744b (patch) | |
tree | 10775154722000b525c590eed6e30e7a5a7f9fb1 /perl-install/install_steps_interactive.pm | |
parent | 2b0ebd1fa6ed628f8df57944f30a65f303c483e5 (diff) | |
download | drakx-0722d266abba248fcf973a18e0fec1ffdc91744b.tar drakx-0722d266abba248fcf973a18e0fec1ffdc91744b.tar.gz drakx-0722d266abba248fcf973a18e0fec1ffdc91744b.tar.bz2 drakx-0722d266abba248fcf973a18e0fec1ffdc91744b.tar.xz drakx-0722d266abba248fcf973a18e0fec1ffdc91744b.zip |
small update to avoid side effect of bless to HASH even if nothing results from
this.
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r-- | perl-install/install_steps_interactive.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 3b0a1f455..5cace73cb 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -554,7 +554,7 @@ The format is the same as auto_install generated floppies."), while (1) { my $w = $o->wait_message(_("Package selection"), _("Loading from floppy")); log::l("load package selection from floppy"); - my $O = eval { install_any::loadO({}, 'floppy') }; + my $O = eval { install_any::loadO(undef, 'floppy') }; if ($@) { $w = undef; #- close wait message. $o->ask_okcancel('', _("Insert a floppy containing package selection")) |