Subversion Repositories wimsdev

Rev

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

Rev 12942 Rev 13052
Line 136... Line 136...
136 
!set class_authscoresuspend=$up_authscoresuspend\
 136 
!set class_authscoresuspend=$up_authscoresuspend\
137 
!set class_exotitleform=$up_exotitleform\
 137 
!set class_exotitleform=$up_exotitleform\
138 
!set class_supconnectshowed=$up_supconnectshowed\
 138 
!set class_supconnectshowed=$up_supconnectshowed\
139 
!set class_defined=yes\
 139 
!set class_defined=yes\
140 
!set class_examscore_withoutip=$up_examscore_withoutip\
 140 
!set class_examscore_withoutip=$up_examscore_withoutip\
- 
 
 141 
!set class_sendmailteacher=$up_sendmailteacher\
141 
in wimshome/log/classes/$wims_class/.def
 142 
in wimshome/log/classes/$wims_class/.def
142 
 
 143 
 
143 
!if $class_type=0 or ($class_type=1 and $wims_typename=class)
 144 
!if $class_type=0 or ($class_type=1 and $wims_typename=class)
144 
  !setdef !set class_allowcloning=$up_allowcloning\
 145 
  !setdef !set class_allowcloning=$up_allowcloning\
145 
!set class_cloningpwd=$up_cloningpwd\
 146 
!set class_cloningpwd=$up_cloningpwd\
Line 148... Line 149...
148 
 
 149 
 
149 
!if $class_type isin 024
 150 
!if $class_type isin 024
150 
  up_regvars=!text select ,$char_alnum in $up_regvars
 151 
  up_regvars=!text select ,$char_alnum in $up_regvars
151 
  up_regvars=!item 1 to $limit_regvars of $up_regvars
 152 
  up_regvars=!item 1 to $limit_regvars of $up_regvars
152 
  up_regvars=!nospace $up_regvars
 153 
  up_regvars=!nospace $up_regvars
153 
  !! MAYBE WE SHOULD TEST LONG OF EACH regvar name (not be too long or too short) ?
 154 
  !! MAYBE WE SHOULD TEST LENGTH OF EACH regvar name (not be too long or too short) ?
154 
  !setdef !set class_regvars=$up_regvars in wimshome/log/classes/$wims_class/.def
 155 
  !setdef !set class_regvars=$up_regvars in wimshome/log/classes/$wims_class/.def
155 
!endif
 156 
!endif
156 
 
 157 
 
157 
lastname=!word -1 of $up_supervisor
 158 
lastname=!word -1 of $up_supervisor
158 
firstname=!word 1 to -2 of $up_supervisor
 159 
firstname=!word 1 to -2 of $up_supervisor