summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2005-05-26 11:56:43 +0000
committerOlivier Blin <oblin@mandriva.org>2005-05-26 11:56:43 +0000
commit6a730a718b9037d934c18b2e741166d290677c40 (patch)
treed1f66dbd4510668d49bc410996841dc8605c97cf /perl-install
parentd1e4255e7067c9a2ffac8239303275089f597344 (diff)
downloaddrakx-6a730a718b9037d934c18b2e741166d290677c40.tar
drakx-6a730a718b9037d934c18b2e741166d290677c40.tar.gz
drakx-6a730a718b9037d934c18b2e741166d290677c40.tar.bz2
drakx-6a730a718b9037d934c18b2e741166d290677c40.tar.xz
drakx-6a730a718b9037d934c18b2e741166d290677c40.zip
remove debug code
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/drakgw2
1 files changed, 0 insertions, 2 deletions
diff --git a/perl-install/standalone/drakgw b/perl-install/standalone/drakgw
index 84c8b07d7..18ca3e7aa 100755
--- a/perl-install/standalone/drakgw
+++ b/perl-install/standalone/drakgw
@@ -365,9 +365,7 @@ sub end_step() {
sub delete_proxy_ports() {
my $r = $shorewall->{redirects}{tcp};
- use Data::Dumper;
my @ports = grep { $r->{$_} eq 'www' } keys %$r;
- print Dumper($r, \@ports);
delete $r->{$_} foreach @ports;
}