From 9125d6f869372a934ea970069f7ca54f496c80ea Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 31 Mar 2005 09:12:58 +0000
Subject: fix typo (bugzilla #15116)

---
 perl-install/network/drakfirewall.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/perl-install/network/drakfirewall.pm b/perl-install/network/drakfirewall.pm
index 6dac5fc12..7b36d4de0 100644
--- a/perl-install/network/drakfirewall.pm
+++ b/perl-install/network/drakfirewall.pm
@@ -126,7 +126,7 @@ sub default_ports {
 
 sub get_ports() {
     my $shorewall = network::shorewall::read() or return;
-    \$shorewall->{ports};
+    $shorewall->{ports};
 }
 
 sub set_ports {
@@ -153,7 +153,7 @@ sub get_conf {
     if ($o_ports) {
 	$disabled, from_ports($o_ports);
     } elsif (my $shorewall = network::shorewall::read()) {
-	$shorewall->{disabled}, from_ports(\$shorewall->{ports});
+	$shorewall->{disabled}, from_ports($shorewall->{ports});
     } else {
 	$in->ask_okcancel('', N("drakfirewall configurator
 
-- 
cgit v1.2.1