Subversion Repositories wimsdev

Rev

Rev 863 | Rev 8952 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

test=!defof class_defined in wimshome/log/classes/$wims_class/.def
!if $test!=yes
 error=bad_class
 !reset job
 !exit
!endif

!if $user!=$empty
 !read adm/class/userdef classes,$wims_class,$user
 !defread $userdef
 !read adm/class/userisinclass $wims_class,$user
 !if $script_reply!=yes
  error=bad_user
  !reset job
  !exit
 !endif
!endif

!if $user!=$empty
 file=motd/$user
!else
 file=.motd
!endif

!if $action=register
 !sh rm -f $wims_home/log/classes/$wims_class/$file;
 !reset job,user,action
!endif