extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2025-06-27 13:11:57 +02:00
Code Issues Packages Projects Releases Wiki Activity

Make validate_address() easier to read

Browse Source 
git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@6361 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
teastep 2007-05-15 20:02:42 +00:00
parent 0040a99a44
commit b0122f9696
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
Shorewall-perl/Shorewall/IPAddrs.pm
View File

@ -65,8 +65,10 @@ sub valid_address( $ ) {
} }
sub validate_address( $ ) { sub validate_address( $ ) {
unless ( valid_address $_[0] ) { my $addr = $_[0];
fatal_error "Unknown Host ($_[0])" unless defined gethostbyname $_[0];
unless ( valid_address $addr ) {
fatal_error "Unknown Host ($addr)" unless defined gethostbyname $addr;
} }
} }