[interchange] * Fix bug where only one address was possible for DebugHost. Now
Mike Heins
interchange-cvs at icdevgroup.org
Sun Jun 5 16:12:07 UTC 2016
commit dfd8dcdbf7ff8c9450baf9bd91fcd76ec9208191
Author: Mike Heins <mike at perusion.com>
Date: Sun Jun 5 16:11:35 2016 +0000
* Fix bug where only one address was possible for DebugHost. Now
accepts a range of IP addresses.
lib/Vend/Config.pm | 4 +++-
1 files changed, 3 insertions(+), 1 deletions(-)
---
diff --git a/lib/Vend/Config.pm b/lib/Vend/Config.pm
index 5d29384..7b1e6a8 100644
--- a/lib/Vend/Config.pm
+++ b/lib/Vend/Config.pm
@@ -3907,12 +3907,14 @@ sub parse_ip_address_regexp {
my ($var, $value) = @_;
return '' unless $value;
+ my @atoms = split /[\s,\0]/, $value;
+
eval {
require Net::IP::Match::Regexp;
};
$@ and config_error("$var directive requires module: $@");
- my $re = Net::IP::Match::Regexp::create_iprange_regexp($value)
+ my $re = Net::IP::Match::Regexp::create_iprange_regexp(@atoms)
or config_error("Improper IP address range for $var");
return $re;
}
More information about the interchange-cvs
mailing list