Subversion Repositories wimsdev

Rev

Rev 16338 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 16338 Rev 16340
Line 57... Line 57...
57 
      !reset success
 57 
      !reset success
58 
    !else
 58 
    !else
59 
      !!mise en place du nouveau fichier (et destruction de l'ancien s'il existe)
 59 
      !!mise en place du nouveau fichier (et destruction de l'ancien s'il existe)
60 
      !sh $delold mv $wims_home/$wims_sesdir/user-deposit $wims_home/log/classes/$wims_class/freeworksdata/$freework/co/$student$exten;
 60 
      !sh $delold mv $wims_home/$wims_sesdir/user-deposit $wims_home/log/classes/$wims_class/freeworksdata/$freework/co/$student$exten;
61 
      !if $(data_0[5])=$empty
 61 
      !if $(data_0[5])=$empty
62 
        !if $notcorrected=1
 - 
 
63 
          !restart module=$module&freework=$freework&job=configfw
 - 
 
64 
        !else
 - 
 
65 
          !increase nbcorrectedcopies
 62 
          !increase nbcorrectedcopies
66 
          notcorrected=$[$nbcopies-$nbcorrectedcopies]
 63 
          notcorrected=$[$nbcopies-$nbcorrectedcopies]
67 
        !endif
 - 
 
68 
      !endif
 64 
      !endif
69 
    !endif
 65 
    !endif
70 
  !endif
 66 
  !endif
71 
!endif
 67 
!endif
72 
!! ------------ save new score (only if scoring>0)
 68 
!! ------------ save new score (only if scoring>0)
Line 96... Line 92...
96 
    update_nbline=$empty
 92 
    update_nbline=$empty
97 
    !read adm/uprecord wimshome/log/classes/$wims_class/.grades
 93 
    !read adm/uprecord wimshome/log/classes/$wims_class/.grades
98 
  !endif
 94 
  !endif
99 
!endif
 95 
!endif
100 
!reset wims_deposit
 96 
!reset wims_deposit
- 
 
 97 
!if $notcorrected=0
- 
 
 98 
  !restart module=$module&freework=$freework&job=configfw
- 
 
 99 
!else
101 
job=configfw
 100 
  job=configfw
102 
!changeto $job.proc
 101 
  !changeto $job.proc
- 
 
 102 
!endif