diff -Nur smeserver-openvpn-s2s-0.2/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/openvpns2s.pm smeserver-openvpn-s2s-0.2_bz10446/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/openvpns2s.pm
--- smeserver-openvpn-s2s-0.2/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/openvpns2s.pm	2013-11-11 18:33:06.000000000 +0100
+++ smeserver-openvpn-s2s-0.2_bz10446/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/openvpns2s.pm	2017-10-25 15:22:01.895920386 +0200
@@ -67,7 +67,7 @@
     my $q = $fm->{cgi};
     my $conf = $q->param('conf_name');
 
-    if ($q->param('action' ne 'modify')){
+    if ($q->param('action') ne 'modify'){
         if ($ovpn_db->get($conf)){
             return $fm->error('CONF_CONFLICT','FIRST_PAGE');
         }
@@ -522,7 +522,7 @@
 sub validate_conf_name{
     my ($fm, $conf_name) = @_;
 
-    unless ($conf_name =~ /^([a-zA-Z0-9][\_\.\-a-zA-Z0-9]*)$/){
+    unless ($conf_name =~ /^([a-zA-Z0-9][\_\.\-a-zA-Z0-9]{0,9})$/){
         return $fm->localise('INVALID_CHARS',{string => $conf_name});
     }
     return "OK";