summaryrefslogtreecommitdiffstats
path: root/perl-install/network
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2005-07-28 06:26:38 +0000
committerOlivier Blin <oblin@mandriva.org>2005-07-28 06:26:38 +0000
commit139986c92ef9147203844148c9cf78c70355b007 (patch)
treed4747230e2fa6902da849ced73dba3dd93352656 /perl-install/network
parent8aec9c45e0276020b6767739e18ef6cdea92b204 (diff)
downloaddrakx-backup-do-not-use-139986c92ef9147203844148c9cf78c70355b007.tar
drakx-backup-do-not-use-139986c92ef9147203844148c9cf78c70355b007.tar.gz
drakx-backup-do-not-use-139986c92ef9147203844148c9cf78c70355b007.tar.bz2
drakx-backup-do-not-use-139986c92ef9147203844148c9cf78c70355b007.tar.xz
drakx-backup-do-not-use-139986c92ef9147203844148c9cf78c70355b007.zip
don't needlessly swap bytes
Diffstat (limited to 'perl-install/network')
-rw-r--r--perl-install/network/activefw.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/network/activefw.pm b/perl-install/network/activefw.pm
index 6e3b781eb..ef6fdf8b9 100644
--- a/perl-install/network/activefw.pm
+++ b/perl-install/network/activefw.pm
@@ -85,7 +85,7 @@ sub get_service {
sub get_ip_address {
my ($addr) = @_;
- inet_ntoa(pack('N', $addr));
+ inet_ntoa(pack('L', $addr));
}
sub resolve_address {