From dc6ee495df67b2107959d1c36ef41fb9f5d3288e Mon Sep 17 00:00:00 2001 From: Damien Chaumette Date: Tue, 29 Apr 2003 09:42:06 +0000 Subject: prevent void list installation --- perl-install/standalone/drakfont | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'perl-install') diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont index fb4d7cba8..81e69297e 100755 --- a/perl-install/standalone/drakfont +++ b/perl-install/standalone/drakfont @@ -776,8 +776,10 @@ sub advanced_install { gtksignal_connect(new Gtk2::Button(N("Remove Selected")), clicked => \&list_remove), gtksignal_connect(new Gtk2::Button(N("Install List")), clicked => sub { - ${$central_widget}->destroy(); - appli_choice(); + if (@install) { + ${$central_widget}->destroy(); + appli_choice(); + } }) ) ) -- cgit v1.2.1