Subversion Repositories wimsdev

Rev

Rev 2150 | Rev 5349 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
23 reyssat 1
!if $vote_status=$empty or \
2
	($wims_user!=supervisor and $vote_status notwordof 1 2)
3
 error=bad_vote
4
 job=home
5
 !changeto home.proc
6
!endif
7
 
8
wims_multiexec=pari maxima yacas
9
insmath_rawmath=yes
10
wims_backslash_insmath=yes
11
parmcnt=0
12
!reset uvname, uvval, uvcnt
13
!readdef $userfile
14
!readdef $votedir/$vote.votes
15
!default vcnt=0
16
 
17
!if $wims_user=supervisor or $vote_show>0
18
 !if $wims_user=supervisor
19
  showres=2
20
 !else
21
  showres=1
22
 !endif
2150 guerimand 23
 whovote_login=!sh cd $wims_home/log/classes/$wims_superclass/.users;\
24
grep -r "!set user_vote_$Vote=yes" * | cut -d":" -f1;
25
 whovote_login=!lines2items $whovote_login
26
 whovote=$empty
27
 !for k in $whovote_login
28
  tmp=!defof user_firstname user_lastname in wimshome/log/classes/$wims_superclass/.users/$k
29
  whovote=!append item $tmp to $whovote
30
 !next k
23 reyssat 31
!else
32
 showres=0
33
!endif
34