diff options
author | Mark Wooding <mdw@distorted.org.uk> | 2017-10-02 01:14:26 +0100 |
---|---|---|
committer | Mark Wooding <mdw@distorted.org.uk> | 2017-10-02 01:14:26 +0100 |
commit | 395a5bb98cfc2cb709586ac062cf353514daf280 (patch) | |
tree | 3fe30170bc693e04c462ca3130bd496958e7446f | |
parent | 9f8946ddeb2b7851502eccb460e5d15845c2fc7e (diff) | |
download | userv-utils-395a5bb98cfc2cb709586ac062cf353514daf280.tar.gz |
ipif/service-wrap: Remove spurious space from space-matching regexp.
You know, I'm not sure this code has been through a comprehensive test
suite.
Signed-off-by: Mark Wooding <mdw@distorted.org.uk>
-rwxr-xr-x | ipif/service-wrap | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ipif/service-wrap b/ipif/service-wrap index 8dca1c3..2bca709 100755 --- a/ipif/service-wrap +++ b/ipif/service-wrap @@ -229,7 +229,7 @@ sub readconfig ($) { my $net = $hn->network() or die; maybe_allow_addrs 'Local', $host; maybe_allow_addrs 'Remote', $net; - } elsif (s{^(local|remote|addrs)\s+(\S+)\ s+}{}) { + } elsif (s{^(local|remote|addrs)\s+(\S+)\s+}{}) { my $h = $1; my $s = new NetAddr::IP::Lite $2 or badcfg "invalid ip address or mask in $h"; |