diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-03-20 19:52:33 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-03-20 19:52:33 +0000 |
| commit | b3111e7e9c262d8c71e23a6dc78d5d7a888dacc3 (patch) | |
| tree | d42205550d30ec092f9743748bcec938017f985b /lib/network/ifw.pm | |
| parent | 683619174a6cd634655ac6a489b5a6efb1b5b3cc (diff) | |
| download | drakx-net-b3111e7e9c262d8c71e23a6dc78d5d7a888dacc3.tar drakx-net-b3111e7e9c262d8c71e23a6dc78d5d7a888dacc3.tar.gz drakx-net-b3111e7e9c262d8c71e23a6dc78d5d7a888dacc3.tar.bz2 drakx-net-b3111e7e9c262d8c71e23a6dc78d5d7a888dacc3.tar.xz drakx-net-b3111e7e9c262d8c71e23a6dc78d5d7a888dacc3.zip | |
perl_checker cleanups
Diffstat (limited to 'lib/network/ifw.pm')
| -rw-r--r-- | lib/network/ifw.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/network/ifw.pm b/lib/network/ifw.pm index 2509b93..94ea851 100644 --- a/lib/network/ifw.pm +++ b/lib/network/ifw.pm @@ -113,7 +113,7 @@ sub resolve_address { eval { local $SIG{ALRM} = sub { die "ALARM" }; alarm 2; - $hostname = gethostbyaddr(inet_aton($ip_addr), AF_INET); + $hostname = gethostbyaddr(inet_aton($ip_addr), Socket::AF_INET); alarm 0; }; $hostname || $ip_addr; |