Rev 5340 | Rev 5471 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 5340 | Rev 5369 | ||
---|---|---|---|
Line 3... | Line 3... | ||
3 | !exit |
3 | !exit |
4 | !endif |
4 | !endif |
5 | !if $seq!= |
5 | !if $seq!= |
6 | !set wims_sequence=$seq |
6 | !set wims_sequence=$seq |
7 | !endif |
7 | !endif |
8 | - | ||
- | 8 | !read adm/lang/date.phtml.$moduclass_lang |
|
9 | limit_textarea=600 |
9 | limit_textarea=600 |
10 | 10 | ||
11 | wims_nw=votedir Votedir userdef vote Vote job empty |
11 | wims_nw=votedir Votedir userdef vote Vote job empty |
12 | wims_nr=wims_sesrandom |
12 | wims_nr=wims_sesrandom |
13 | Votedir=classes/$wims_class/vote |
13 | Votedir=classes/$wims_class/vote |
Line 15... | Line 15... | ||
15 | !read adm/class/userdef classes,$wims_class,$wims_user |
15 | !read adm/class/userdef classes,$wims_class,$wims_user |
16 | userfile=$userdef |
16 | userfile=$userdef |
17 | !read adm/class/classlang names.phtml |
17 | !read adm/class/classlang names.phtml |
18 | 18 | ||
19 | !bound vote between integer 1 and 64 default 0 |
19 | !bound vote between integer 1 and 64 default 0 |
- | 20 | ||
20 | 21 | ||
- | 22 | !default gstep=0 |
|
- | 23 | ||
21 | vote_class=!defof sharing_vote in wimshome/log/classes/$wims_class/neighbors |
24 | vote_class=!defof sharing_vote in wimshome/log/classes/$wims_class/neighbors |
22 | !default vote_class=$wims_class |
25 | !default vote_class=$wims_class |
23 | !default wims_superclass=$wims_class |
26 | !default wims_superclass=$wims_class |
24 | !if $wims_superclass != $wims_class |
27 | !if $wims_superclass != $wims_class |
25 | Votevar=!replace internal $wims_superclass/ by $ in $vote_class |
28 | Votevar=!replace internal $wims_superclass/ by $ in $vote_class |
26 | Votevar=!translate internal / to _ in $Votevar |
29 | Votevar=!translate internal / to _ in $Votevar |
27 | Vote=$(Votevar)_$vote |
30 | Vote=$(Votevar)_$vote |
28 | !else |
31 | !else |
29 | Vote=$vote |
32 | Vote=$vote |
30 | Votevar= |
33 | Votevar= |
31 | !endif |
34 | !endif |
32 | 35 | ||
33 | !if $rEg!=$empty |
36 | !if $rEg!=$empty |
34 | job=reg |
37 | job=reg |
35 | rEg= |
38 | rEg= |
36 | !endif |
39 | !endif |
37 | !if $abandon!=$empty |
40 | !if $abandon!=$empty |
- | 41 | !!!FIXME edit or home |
|
38 |
|
42 | job=edit |
- | 43 | !set gstep=$[max($gstep-2,0)] |
|
39 | abandon= |
44 | abandon= |
40 | !endif |
45 | !endif |
- | 46 | ||
41 | readjobs=home,read,help,vote,showresult |
47 | readjobs=home,read,help,vote,showresult |
42 | editjobs=creat,guided,edit,reg,erase,preview,csv |
48 | editjobs=creat,guided,edit,reg,erase,preview,csv |
43 | !if $wims_user=supervisor |
49 | !if $wims_user=supervisor |
44 | !bound job within $readjobs,$editjobs default home |
50 | !bound job within $readjobs,$editjobs default home |
45 | !else |
51 | !else |
Line 58... | Line 64... | ||
58 | !if $votecnt<1 and $job notwordof reg creat csv |
64 | !if $votecnt<1 and $job notwordof reg creat csv |
59 | job=home |
65 | job=home |
60 | !changeto home.proc |
66 | !changeto home.proc |
61 | !endif |
67 | !endif |
62 | !if $job=creat |
68 | !if $job=creat |
- | 69 | !reset gstep |
|
63 | !if $votecnt>=64 |
70 | !if $votecnt>=64 |
64 | error=too_many_votes |
71 | error=too_many_votes |
65 | !exit |
72 | !exit |
66 | !else |
73 | !else |
67 | vote=$[$votecnt+1] |
74 | vote=$[$votecnt+1] |
Line 79... | Line 86... | ||
79 | !default vote_show=1 |
86 | !default vote_show=1 |
80 | !! !default vote_model=free |
87 | !! !default vote_model=free |
81 | vote_src=!record 0 of $votedir/$vote.src |
88 | vote_src=!record 0 of $votedir/$vote.src |
82 | !endif |
89 | !endif |
83 | !default reg_model=$vote_model |
90 | !default reg_model=$vote_model |
- | 91 | !! at some gstep these variables are not in the form but are required by reg.proc, so |
|
- | 92 | !! we need to be sure to have found defaults |
|
- | 93 | !default reg_status=$vote_status |
|
- | 94 | !default reg_option=$vote_option |
|
- | 95 | !default reg_show=$vote_show |
|
- | 96 | !default reg_status=$vote_status |
|
84 | 97 | ||
85 | !if $vote<1 |
98 | !if $vote<1 |
86 | job=home |
99 | job=home |
87 | !endif |
100 | !endif |
88 | 101 | ||
89 |
|
102 | !set vmodellist=accessvar,group |
90 |
|
103 | !set name_vmodellist=$(name_accessvar), $(name_group) |
91 | !! vmodel --> vote_model (defined in the .votes file) |
- | |
92 | !! vmodel=!defof vmodel in $votedir/$vote.data |
- | |
93 | !! le seguenti servivano per impedire di cambiare il modello se il vote è chiuso |
- | |
94 | !! !if $vote_status>0 |
- | |
95 | !! $mod_vmodel=$empty |
- | |
96 | !! !else |
- | |
97 | !! !default mod_vmodel=$vmodel |
- | |
98 | !! !endif |
- | |
99 | !! se $vmodel è $empty, allora il default va su free (??) |
- | |
100 | !! !default mod_vmodel=$vmodel |
- | |
101 | !! no, we do not want a "default" so that we can check "where we are" |
- | |
102 | !! !default mod_vmodel=free |
- | |
103 | 104 | ||
104 | !read $job.proc |
105 | !read $job.proc |
105 | 106 |