ovpnmain.cgi: Update status extraction for Connection Status

- The format of the connection status has changed and this change ensures that the
   status is correctly shown in the Connection Status and Control table

Signed-off-by: Adolf Belka <adolf.belka@ipfire.org>
Signed-off-by: Michael Tremer <michael.tremer@ipfire.org>

diff --git a/html/cgi-bin/ovpnmain.cgi b/html/cgi-bin/ovpnmain.cgi
index 3fb356acd2c1d6291830bee0c3695d7717bc8a02..ab91eec570fec74255c160734ffbb3a2c11bf62c 100644 (file)
--- a/html/cgi-bin/ovpnmain.cgi
+++ b/html/cgi-bin/ovpnmain.cgi
@@ -5314,8 +5314,8 @@ END
                        foreach my $line (@status) {
                                chomp($line);
 
-                               if ($line =~ /^(.+),(\d+\.\d+\.\d+\.\d+\:\d+),(\d+),(\d+),(.+)/) {
-                                       my @match = split(m/^(.+),(\d+\.\d+\.\d+\.\d+\:\d+),(\d+),(\d+),(.+)/, $line);
+                               if ($line =~ /^(.+),(.+\:\d+\.\d+\.\d+\.\d+\:\d+),(\d+),(\d+),(.+)/) {
+                                       my @match = split(m/^(.+),(.+\:\d+\.\d+\.\d+\.\d+\:\d+),(\d+),(\d+),(.+)/, $line);
 
                                        if ($match[1] ne "Common Name") {
                                                $cn = $match[1];