[vhffs-dev] [1181] 0 are valid values |
[ Thread Index |
Date Index
| More vhffs.org/vhffs-dev Archives
]
Revision: 1181
Author: gradator
Date: 2008-04-02 19:17:50 +0200 (Wed, 02 Apr 2008)
Log Message:
-----------
0 are valid values
Modified Paths:
--------------
trunk/vhffs-api/src/Vhffs/Services/DNS.pm
Modified: trunk/vhffs-api/src/Vhffs/Services/DNS.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Services/DNS.pm 2008-03-30 18:02:22 UTC (rev 1180)
+++ trunk/vhffs-api/src/Vhffs/Services/DNS.pm 2008-04-02 17:17:50 UTC (rev 1181)
@@ -585,8 +585,8 @@
return -2 unless($svc =~ /^(?:_\w+)|(?:[^_]\w*)$/);
return -3 unless( Vhffs::Functions::check_domain_name($host, 1) || ( $host =~ /[a-z0-9\-]{1,63}/ ) );
return -4 unless($port =~ /^\d+$/ && $port <= 65535 && $port > 0);
- return -5 unless($priority =~ /^\d+$/ && $priority <= 65535 && $priority > 0);
- return -6 unless($weight =~ /^\d+$/ && $weight <= 65535 && $weight > 0);
+ return -5 unless($priority =~ /^\d+$/ && $priority <= 65535 && $priority >= 0);
+ return -6 unless($weight =~ /^\d+$/ && $weight <= 65535 && $weight >= 0);
$proto = "_$proto" unless($proto =~ /^_/);
$proto = lc($proto);
@@ -642,8 +642,8 @@
return -2 unless(defined $rr);
return -3 unless( Vhffs::Functions::check_domain_name($host, 1) || ( $host =~ /[a-z0-9\-]{1,63}/ ) );
return -4 unless($port =~ /^\d+$/ && $port <= 65535 && $port > 0);
- return -5 unless($priority =~ /^\d+$/ && $priority <= 65535 && $priority > 0);
- return -6 unless($weight =~ /^\d+$/ && $weight <= 65535 && $weight > 0);
+ return -5 unless($priority =~ /^\d+$/ && $priority <= 65535 && $priority >= 0);
+ return -6 unless($weight =~ /^\d+$/ && $weight <= 65535 && $weight >= 0);
my $data = "$weight $port $host";