Subversion Repositories wimsdev

Rev

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

Rev 5100 Rev 5108
Line 72... Line 72...
72 
 !endif
 72 
 !endif
73 
 coursecheck=!defof user_class in wimshome/log/classes/$class/.users/$auth_user
 73 
 coursecheck=!defof user_class in wimshome/log/classes/$class/.users/$auth_user
74 
 !if $coursecheck!=$empty
 74 
 !if $coursecheck!=$empty
75 
  upartic=!append item $class to $upartic
 75 
  upartic=!append item $class to $upartic
76 
 !endif
 76 
 !endif
- 
 
 77 
 !!check mandatory course
- 
 
 78 
 dcourse=!record 0 of wimshome/log/classes/$pclass/courses
- 
 
 79 
 dcourse=!column 1 of $dcourse
- 
 
 80 
 !if $dcourse!=$empty
- 
 
 81 
     dcourse=!makelist $wims_superclass/xx for xx in $dcourse
- 
 
 82 
     upartic=!append item $dcourse to $upartic
- 
 
 83 
 !endif
- 
 
 84 
 upartic=!listuniq $upartic
77 
 !if $auth_user=supervisor and $wims_user=supervisor
 85 
 !if $auth_user=supervisor and $wims_user=supervisor
78 
  ctype=!defof class_typename in wimshome/log/classes/$class/.def
 86 
  ctype=!defof class_typename in wimshome/log/classes/$class/.def
79 
  prog=!defof sharing_exam in wimshome/log/classes/$class/neighbors
 87 
  prog=!defof sharing_exam in wimshome/log/classes/$class/neighbors
80 
  !if $ctype iswordof course icourse and $prog=$wims_class
 88 
  !if $ctype iswordof course icourse and $prog=$wims_class
81 
   pass=$current_pass
 89 
   pass=$current_pass
82 
  !endif
 90 
  !endif
83 
 !endif
 91 
 !endif
- 
 
 92 
!!upartic : no more authentification should check for optional courses ?
84 
 !if $class notitemof $upartic and $auth_user!=supervisor and $wims_user!=supervisor
 93 
 !if $class notitemof $upartic and $auth_user!=supervisor and $wims_user!=supervisor
85 
  pass=
 94 
  pass=
86 
 !endif
 95 
 !endif
87 
# These lines should be opened later to close this possibility.
 96 
# These lines should be opened later to close this possibility.
88 
# !if $auth_user=supervisor and $wims_user=$empty
 97 
# !if $auth_user=supervisor and $wims_user=$empty