Subversion Repositories wimsdev

Rev

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

Rev 12080 Rev 12413
Line 9... Line 9...
9 
$(cl)_forumcnt=!recordcnt wimshome/$cls/forum/.msglist
 9 
$(cl)_forumcnt=!recordcnt wimshome/$cls/forum/.msglist
10 
$(cl)_docpubliccnt=!recordcnt wimshome/$cls/doc/.docindex
 10 
$(cl)_docpubliccnt=!recordcnt wimshome/$cls/doc/.docindex
11 
t=!filelist $wims_home/$cls/src/*.oef
 11 
t=!filelist $wims_home/$cls/src/*.oef
12 
$(cl)_exocnt=!wordcnt $t
 12 
$(cl)_exocnt=!wordcnt $t
13 
!if log/classes isin $cls
 13 
!if log/classes isin $cls
14 
 cls_ph=!replace / by , in $cls
 14 
  cls_ph=!replace / by , in $cls
15 
 cls_ph=log/classes/$(cls_ph[3])
 15 
  cls_ph=log/classes/$(cls_ph[3])
16 
!else
 16 
!else
17 
 cls_ph=$cls
 17 
  cls_ph=$cls
18 
!endif
 18 
!endif
19 
t=!filelist $wims_home/$cls_ph/photoboard/
 19 
t=!filelist $wims_home/$cls_ph/photoboard/
20 
$(cl)_userphotocnt=!wordcnt $t
 20 
$(cl)_userphotocnt=!wordcnt $t
21 
$(cl)_cdtcnt=!defof cdt_nbdate in wimshome/$cls/cdt/.def
 21 
$(cl)_cdtcnt=!defof cdt_nbdate in wimshome/$cls/cdt/.def
22 
$(cl)_seqcnt=!record 0 of wimshome/$cls/seq/.sequences
 22 
$(cl)_seqcnt=!record 0 of wimshome/$cls/seq/.sequences
Line 43... Line 43...
43 
  $(cl)_motdcnt=0
 43 
  $(cl)_motdcnt=0
44 
!endif
 44 
!endif
45 
 
 45 
 
46 
t=!defof user_exists in wimshome/$cls/supervisor
 46 
t=!defof user_exists in wimshome/$cls/supervisor
47 
!if $t=yes
 47 
!if $t=yes
48 
 $(cl)_supcnt=1
 48 
  $(cl)_supcnt=1
49 
!else
 49 
!else
50 
 $(cl)_supcnt=0
 50 
  $(cl)_supcnt=0
51 
!endif
 51 
!endif