diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-07-29 12:39:59 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-07-29 12:39:59 +0000 |
commit | 074de8adaf6e0d910899b7ee0f14066dcc050af7 (patch) | |
tree | 1b951142b3f0fe8d6231dd5c56af111261c5a214 /perl-install/install_steps_gtk.pm | |
parent | bbd54ab4ee665a9afdf8642aa767bdbd608131c6 (diff) | |
download | drakx-074de8adaf6e0d910899b7ee0f14066dcc050af7.tar drakx-074de8adaf6e0d910899b7ee0f14066dcc050af7.tar.gz drakx-074de8adaf6e0d910899b7ee0f14066dcc050af7.tar.bz2 drakx-074de8adaf6e0d910899b7ee0f14066dcc050af7.tar.xz drakx-074de8adaf6e0d910899b7ee0f14066dcc050af7.zip |
ensure choosing install-or-upgrade can't be done twice
(since it's badly handled and hard to handle nicely)
Diffstat (limited to 'perl-install/install_steps_gtk.pm')
-rw-r--r-- | perl-install/install_steps_gtk.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 1ad27b7fe..ccfe6a53c 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -155,7 +155,7 @@ press `F1' when booting on CDROM, then enter `text'.")) if $first_time && availa #------------------------------------------------------------------------------ sub selectInstallClass1 { my ($o, $verif, $l, $def, $l2, $def2) = @_; - $::live || @$l == 1 and return $o->SUPER::selectInstallClass1($verif, $l, $def, $l2, $def2); + $::live || @$l == 1 || !@$l2 and return $o->SUPER::selectInstallClass1($verif, $l, $def, $l2, $def2); my $w = my_gtk->new(_("Install Class")); my $focused; |