Subversion Repositories wimsdev

Rev

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

Rev 5263 Rev 5342
Line 89... Line 89...
89 
date=!translate : to . in $wims_now
 89 
date=!translate : to . in $wims_now
90 
!appendfile wimshome/log/classes/$qclass/.log $date $httpd_REMOTE_ADDR      User $quser added
90 
!appendfile wimshome/log/classes/$qclass/.log $date $httpd_REMOTE_ADDR      User $quser added
91 
 
 91 
 
92 
!if $class_superclass != $empty
 92 
!if $class_superclass != $empty
93 
  !read adm/class/mkuserlist $subclass
 93 
  !read adm/class/mkuserlist $subclass
- 
 
 94 
!! need also to create teacherlist
- 
 
 95 
   !read adm/gateway/mkteacherlist $class_superclass
94 
!endif
 96 
!endif
- 
 
 97 
!if $class_type=4 or $class_type=2
- 
 
 98 
!! need also to read mkteacherlist as you might want to add users wish user_supervisable=yes
- 
 
 99 
  !read adm/gateway/mkteacherlist $qclass
- 
 
 100 
!endif
- 
 
 101 
 
- 
 
 102