Subversion Repositories wimsdev

!if $vote_status=$empty or \
        ($wims_user!=supervisor and $vote_status notwordof 1 2)
 error=bad_vote
 job=home
 !changeto home.proc
!endif

wims_multiexec=pari maxima yacas
insmath_rawmath=yes
wims_backslash_insmath=yes
parmcnt=0
!reset uvname, uvval, uvcnt
!readdef $userfile
!readdef $votedir/$vote.votes
!default vcnt=0

!if $wims_user=supervisor or $vote_show>0
 !if $wims_user=supervisor
  showres=2
 !else
  showres=1
 !endif
 whovote_login=!sh cd $wims_home/log/classes/$wims_superclass/.users;\
grep -r "!set user_vote_$Vote=yes" * | cut -d":" -f1;
 whovote_login=!lines2items $whovote_login
 whovote=$empty
 !for k in $whovote_login
  tmp=!defof user_firstname user_lastname in wimshome/log/classes/$wims_superclass/.users/$k
  whovote=!append item $tmp to $whovote
 !next k
!else
 showres=0
!endif