summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-03-24 12:14:40 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-03-24 12:14:40 +0000
commit76f587cb316af6842c69116fba9c853645242403 (patch)
tree95d827ca2fb93e24f910f0914c5a8f1df4746b41 /perl-install
parent1a526b2e0f5039e2aa28166c1a1e3cec6c46e759 (diff)
downloaddrakx-76f587cb316af6842c69116fba9c853645242403.tar
drakx-76f587cb316af6842c69116fba9c853645242403.tar.gz
drakx-76f587cb316af6842c69116fba9c853645242403.tar.bz2
drakx-76f587cb316af6842c69116fba9c853645242403.tar.xz
drakx-76f587cb316af6842c69116fba9c853645242403.zip
return the user choices
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/network/drakfirewall.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/network/drakfirewall.pm b/perl-install/network/drakfirewall.pm
index 006889b3e..bafcc4b8a 100644
--- a/perl-install/network/drakfirewall.pm
+++ b/perl-install/network/drakfirewall.pm
@@ -209,5 +209,7 @@ sub main {
($disabled, my $ports) = choose($in, $disabled, $servers, $unlisted) or return;
- set_ports($in->do_pkgs, $disabled, $ports, $in);
+ set_ports($in->do_pkgs, $disabled, $ports, $in) or return;
+
+ ($disabled, $ports);
}