Subversion Repositories wimsdev

Rev

Rev 17433 | Rev 17527 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 17433 Rev 17490
Line 216... Line 216...
216
  !default exam_mode=0
216
  !default exam_mode=0
217
  activetest=!line 1 of $activetest
217
  activetest=!line 1 of $activetest
218
  exocnt=!recordcnt wimshome/log/classes/$wims_class/exams/.exam$exam
218
  exocnt=!recordcnt wimshome/log/classes/$wims_class/exams/.exam$exam
219
  !if $job=student
219
  !if $job=student
220
    !if $wims_exrandomlist=$empty or $(wims_exrandomlist[2;])!=$exam
220
    !if $wims_exrandomlist=$empty or $(wims_exrandomlist[2;])!=$exam
221
      !if exrandomlist iswordof $class_option
221
      !if exrandomlist iswordof $class_option and $exam_mode!=1
222
        wims_exrandomlist=!shuffle $exocnt
222
        wims_exrandomlist=!shuffle $exocnt
223
      !else
223
      !else
224
        wims_exrandomlist=!makelist x for x = 1 to $exocnt
224
        wims_exrandomlist=!makelist x for x = 1 to $exocnt
225
      !endif
225
      !endif
226
      wims_exrandomlist=$wims_exrandomlist;$exam;$exam_mode
226
      wims_exrandomlist=$wims_exrandomlist;$exam;$exam_mode