Private Polls (#4488)

Allows to set poll results to private
This commit is contained in:
Werner
2018-04-02 13:30:32 +02:00
committed by Erki
parent f026545084
commit 8733d9b2ae
4 changed files with 21 additions and 5 deletions

View File

@@ -52,12 +52,21 @@
adminonly = 0
else
return
var/publicresult = 0
var/viewtoken = null
viewtoken = input("Should the poll be visible for everyone or only with a key?","Viewtoken") as text
if(viewtoken)
publicresult = 1
viewtoken = "'[sanitizeSQL(viewtoken)]'"
else
viewtoken = "NULL"
var/sql_ckey = sanitizeSQL(ckey)
var/question = input("Write your question","Question") as message
if(!question)
return
question = sanitizeSQL(question)
var/DBQuery/query_polladd_question = dbcon.NewQuery("INSERT INTO ss13_poll_question (polltype, starttime, endtime, question, adminonly, multiplechoiceoptions, createdby_ckey, createdby_ip) VALUES ('[polltype]', '[starttime]', '[endtime]', '[question]', '[adminonly]', '[choice_amount]', '[sql_ckey]', '[address]')")
var/DBQuery/query_polladd_question = dbcon.NewQuery("INSERT INTO ss13_poll_question (polltype, starttime, endtime, question, adminonly, multiplechoiceoptions, createdby_ckey, createdby_ip, publicresult, viewtoken) VALUES ('[polltype]', '[starttime]', '[endtime]', '[question]', '[adminonly]', '[choice_amount]', '[sql_ckey]', '[address]', '[publicresult]', [viewtoken])")
if(!query_polladd_question.Execute())
var/err = query_polladd_question.ErrorMsg()
to_chat(src,"SQL ERROR adding new poll question to table. Error : \[[err]\]\n")

View File

@@ -64,7 +64,7 @@ INITIALIZE_IMMEDIATE(/mob/abstract/new_player)
output += "</div>"
src << browse(output,"window=playersetup;size=210x280;can_close=0")
src << browse(output,"window=playersetup;size=210x310;can_close=0")
/mob/abstract/new_player/Stat()
..()