diff options
author | Francois Pons <fpons@mandriva.com> | 2001-04-13 15:07:16 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2001-04-13 15:07:16 +0000 |
commit | 154c77067e7f4962c77c6ae4811bb78933d00afa (patch) | |
tree | e936358456e71e76043194ba7a007fd5021fb922 /perl-install | |
parent | a59b279c3cb74856656c763ad07943d1fdaddc55 (diff) | |
download | drakx-154c77067e7f4962c77c6ae4811bb78933d00afa.tar drakx-154c77067e7f4962c77c6ae4811bb78933d00afa.tar.gz drakx-154c77067e7f4962c77c6ae4811bb78933d00afa.tar.bz2 drakx-154c77067e7f4962c77c6ae4811bb78933d00afa.tar.xz drakx-154c77067e7f4962c77c6ae4811bb78933d00afa.zip |
avoid illegal modulus zero if no advertizing is available.
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install_steps_gtk.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index c62145598..150c444d0 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -582,6 +582,7 @@ sub installPackages { gtkset_mousecursor_normal($cancel->window); my $advertize = sub { + @install_any::advertising_images or return; $show_advertising ? $_->hide : $_->show foreach $msg, $progress, $text; gtkdestroy($advertising) if $advertising; if ($show_advertising && $_[0]) { |