Don't allow space in group name

diff --git a/servers/lang/en b/servers/lang/en
index 4ed6e07..ff10205 100644 (file)
--- a/servers/lang/en
+++ b/servers/lang/en
@@ -62,6 +62,7 @@ save_euser=Missing username
 save_epass=Missing password
 save_egroup=Missing group name
 save_elogin=Invalid login or password to host
+save_egroup2=Invalid new group name
 
 find_title=Find Servers
 find_new=Found new server at $1

diff --git a/servers/save_serv.cgi b/servers/save_serv.cgi
index 875a45a..8f0a159 100755 (executable)
--- a/servers/save_serv.cgi
+++ b/servers/save_serv.cgi
@@ -73,7 +73,10 @@ else {
 
        # save the server
        @groups = split(/\0/, $in{'group'});
-       push(@groups, $in{'newgroup'}) if ($in{'newgroup'});
+       if ($in{'newgroup'}) {
+               $in{'newgroup'} =~ /^\S+$/ || &error($text{'save_egroup2'});
+               push(@groups, $in{'newgroup'});
+               }
        $serv->{'host'} = $in{'host'};
        $serv->{'port'} = $in{'port'};
        $serv->{'type'} = $in{'type'};