blob: 798d185f22369239a29ffa906dbab70025c47ef5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
|
#!/usr/bin/env ruby
############################################################################
# Copyright 2009,2010 Benjamin Kellermann #
# #
# This file is part of dudle. #
# #
# Dudle is free software: you can redistribute it and/or modify it under #
# the terms of the GNU Affero General Public License as published by #
# the Free Software Foundation, either version 3 of the License, or #
# (at your option) any later version. #
# #
# Dudle is distributed in the hope that it will be useful, but WITHOUT ANY #
# WARRANTY; without even the implied warranty of MERCHANTABILITY or #
# FITNESS FOR A PARTICULAR PURPOSE. See the GNU Affero General Public #
# License for more details. #
# #
# You should have received a copy of the GNU Affero General Public License #
# along with dudle. If not, see <http://www.gnu.org/licenses/>. #
############################################################################
if __FILE__ == $0
load "../dudle.rb"
$d = Dudle.new
if $cgi.include?("add_participant")
if $cgi.include?("delete_participant")
$d.table.delete($cgi["olduser"])
else
agreed = {}
$cgi.params.each{|k,v|
if k =~ /^add_participant_checked_/
agreed[k.gsub(/^add_participant_checked_/,"")] = v[0]
end
}
$d.table.add_participant($cgi["olduser"],$cgi["add_participant"],agreed)
end
end
$d.table.add_comment($cgi["commentname"],$cgi["comment"]) if $cgi["comment"] != ""
$d.table.delete_comment($cgi["delete_comment"].to_i) if $cgi.include?("delete_comment")
$d.html.add_atom("atom.cgi") if File.exists?("../atom.rb")
reloadstr = _("Reload")
$d << <<END
<form method='get' action='.'>
<div>
<input value='#{reloadstr}' type='submit'/>
</div>
</form>
END
# TABLE
$d << <<HTML
<div id='polltable'>
<form method='post' action='.'>
#{$d.table.to_html($cgi['edituser'])}
</form>
</div>
#{$d.table.comment_to_html}
HTML
$d.out
end
|