From 9555bb791920e8feace953f90cf908e864451b59 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 8 Jul 2002 07:45:08 +0000 Subject: various cleanups: - move all harddrake modules to harddrake namespace - replace two use by require so that it's not done at compil time but at runtime - there was a missing $ in harddrake::ui.pm --- perl-install/standalone/draknet | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'perl-install/standalone/draknet') diff --git a/perl-install/standalone/draknet b/perl-install/standalone/draknet index 968273828..083c99230 100755 --- a/perl-install/standalone/draknet +++ b/perl-install/standalone/draknet @@ -669,10 +669,8 @@ Create one first by clicking on 'Configure'")),1,1,0); $button_ok->signal_connect ( clicked => sub { $i=0; foreach (@mask) { - if ($_) { - ${$conf_data[$i]->[1]}=$infos[2*$i+1]->get_text(); - } - $i++; + ${$conf_data[$i]->[1]}=$infos[2*$i+1]->get_text() if ($_); + $i++; } update(); $button_apply->set_sensitive(1); -- cgit v1.2.1