diff options
author | Benjamin Kellermann <Benjamin.Kellermann@gmx.de> | 2009-12-07 23:24:40 +0100 |
---|---|---|
committer | Benjamin Kellermann <Benjamin.Kellermann@gmx.de> | 2009-12-07 23:24:40 +0100 |
commit | 48cd11e7ce34348bc91b144ffbcd46e0e90a8bc0 (patch) | |
tree | f7bf1236a8e083f443cdbcefad7c1bef50954a3b | |
parent | aabefa77550cdd4ac06e886bfbbaa167b7930766 (diff) |
create poll alias automatically if containing no special chars
-rwxr-xr-x | index.cgi | 6 |
1 files changed, 5 insertions, 1 deletions
@@ -34,7 +34,11 @@ $d = Dudle.new("Home") if $cgi.include?("create_poll") && $cgi.include?("poll_url") POLLNAME=$cgi["create_poll"] if $cgi["poll_url"] == "" - POLLURL = `pwgen -1`.chomp + if $cgi["create_poll"] =~ /^[\w\-_]*$/ + POLLURL = $cgi["create_poll"] + else + POLLURL = `pwgen -1`.chomp + end else POLLURL=$cgi["poll_url"] end |