Subversion Repositories wimsdev

Rev

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

Rev 12845 Rev 13211
Line 77... Line 77...
77 
  !endif
 77 
  !endif
78 
  !!check mandatory course
 78 
  !!check mandatory course
79 
  dcourse=!record 0 of wimshome/log/classes/$pclass/courses
 79 
  dcourse=!record 0 of wimshome/log/classes/$pclass/courses
80 
  dcourse=!column 1 of $dcourse
 80 
  dcourse=!column 1 of $dcourse
81 
  !if $dcourse!=$empty
 81 
  !if $dcourse!=$empty
82 
    dcourse=!makelist $wims_superclass/xx for xx in $dcourse
 82 
    dcourse=!makelist $superclass/xx for xx in $dcourse
83 
    upartic=!append item $dcourse to $upartic
 83 
    upartic=!append item $dcourse to $upartic
84 
  !endif
 84 
  !endif
85 
  upartic=!listuniq $upartic
 85 
  upartic=!listuniq $upartic
86 
  !if $auth_user=supervisor and $wims_user=supervisor
 86 
  !if $auth_user=supervisor and $wims_user=supervisor
87 
    ctype=!defof class_typename in wimshome/log/classes/$class/.def
 87 
    ctype=!defof class_typename in wimshome/log/classes/$class/.def