From: Mark Wooding Date: Mon, 2 Oct 2017 00:14:26 +0000 (+0100) Subject: ipif/service-wrap: Remove spurious space from space-matching regexp. X-Git-Tag: userv/0.6.1~6 X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=userv-utils.git;a=commitdiff_plain;h=395a5bb98cfc2cb709586ac062cf353514daf280 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 --- 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";