diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-03-17 13:27:10 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-03-17 13:27:10 +0000 |
commit | 79b2efbe9ad644cc0cce5066ccf65127f49a6323 (patch) | |
tree | 9d8c60346efcb6452f641d2b9f1dbf5202bde9c8 /perl-install | |
parent | e0ddbaab310e98ca4486d1f2ef053f12d46f53ed (diff) | |
download | drakx-79b2efbe9ad644cc0cce5066ccf65127f49a6323.tar drakx-79b2efbe9ad644cc0cce5066ccf65127f49a6323.tar.gz drakx-79b2efbe9ad644cc0cce5066ccf65127f49a6323.tar.bz2 drakx-79b2efbe9ad644cc0cce5066ccf65127f49a6323.tar.xz drakx-79b2efbe9ad644cc0cce5066ccf65127f49a6323.zip |
remove debug statements
Diffstat (limited to 'perl-install')
-rwxr-xr-x | perl-install/standalone/drakconnect | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect index b9fd3e765..efc1dcd92 100755 --- a/perl-install/standalone/drakconnect +++ b/perl-install/standalone/drakconnect @@ -584,7 +584,6 @@ sub save { foreach (keys %$p) { save_notebook($netc, $p->{$_}{intf}, $p->{$_}{gui}) or return; - print "will run apply()? ", $p->{$_}{intf}{save}, "\n"; $p->{$_}{intf}{save} ? $p->{$_}{intf}{save}->() : apply($netc, $p->{$_}{intf}); } @@ -704,7 +703,6 @@ sub update_list() { sub apply { my ($netc, $intf) = @_; - print "GOTCHA\n"; my $dyn = $intf->{BOOTPROTO} ne 'static'; my $lintf = $intf; $dyn and $lintf->{$_} = undef foreach qw(NETMASK NETWORK IPADDR); |