wireguard-functions.pl: Fix Perl syntax issue

Signed-off-by: Michael Tremer <michael.tremer@ipfire.org>

diff --git a/config/cfgroot/wireguard-functions.pl b/config/cfgroot/wireguard-functions.pl
index 210423204d4ab3f8e18f8241b5e8bf189402c483..ee4b2d1dec68caf5214a8640463b3685c77b63c3 100644 (file)
--- a/config/cfgroot/wireguard-functions.pl
+++ b/config/cfgroot/wireguard-functions.pl
@@ -485,7 +485,7 @@ sub parse_configuration($) {
                                        }
                                }
 
-                               $peer{'REMOTE_SUBNETS'} = join(/, /, @networks);
+                               $peer{'REMOTE_SUBNETS'} = join(", ", @networks);
                        # Endpoint
                        } elsif ($key eq "Endpoint") {
                                my $address = $val;