Subversion Repositories wimsdev

Rev

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

Rev 16386 Rev 16496
Line 1... Line 1...
1 
!read tabletheme
 1 
!read tabletheme
2 
 
 2 
 
- 
 
 3 
DEBUG_MODULE=!defof DEBUG_MODULE in wimshome/public_html/bases/sys/define.conf
3 
!if $data=$empty
 4 
!if $data=$empty
4 
  !! -------test for an old exologfile (in the class)
 5 
  !! -------test for an old exologfile (in the class)
5 
  !if $logtype=exam
 6 
  !if $logtype=exam
6 
    test=!fileexists wimshome/log/classes/$wims_class/examlog/$checkuser/$checksession/$logcheck
 7 
    test=!fileexists wimshome/log/classes/$wims_class/examlog/$checkuser/$checksession/$logcheck
7 
    !if $test=yes
 8 
    !if $test=yes
Line 48... Line 49...
48 
  dt2=!getdef category\
 49 
  dt2=!getdef category\
49 
author\
 50 
author\
50 
address\
 51 
address\
51 
maintainer_address\
 52 
maintainer_address\
52 
version in $modulefile
 53 
version in $modulefile
53 
  t_email2=!replace internal xiao@unice.fr by qualite@wimsedu.info in $(dt2[3;])
 54 
  t_email2=!replace internal xiao@unice.fr by $DEBUG_MODULE in $(dt2[3;])
54 
 
 55 
 
55 
  data=module=$(dt1[3;])\
 56 
  data=module=$(dt1[3;])\
56 
module_author=$(dt2[2;])\
 57 
module_author=$(dt2[2;])\
57 
module_version=$(dt2[5;])\
 58 
module_version=$(dt2[5;])\
58 
module_mail=$t_email2\
 59 
module_mail=$t_email2\
59 
module_maintainer_mail=$(dt2[4;])
 60 
module_maintainer_mail=$(dt2[4;])
60 
  local_email=$t_email2,$(dt2[4;])
 61 
  local_email=$t_email2,$(dt2[4;])
61 
  tmp=!nospace $(dt2[1;])
 62 
  tmp=!nospace $(dt2[1;])
62 
  !if oef isitemof $tmp
 63 
  !if oef isitemof $tmp
63 
    t_email1=!replace internal xiao@unice.fr by qualite@wimsedu.info in $(dt1[2;])
 64 
    t_email1=!replace internal xiao@unice.fr by $DEBUG_MODULE in $(dt1[2;])
64 
    tmp=!replace internal def/ by $empty in $(dt1[5;])
 65 
    tmp=!replace internal def/ by $empty in $(dt1[5;])
65 
    tmp=!replace internal .def by $empty in $tmp
 66 
    tmp=!replace internal .def by $empty in $tmp
66 
    data=$data\
 67 
    data=$data\
67 
\
 68 
\
68 
OEF_exo=$tmp\
 69 
OEF_exo=$tmp\
Line 83... Line 84...
83 
!endif
 84 
!endif
84 
 
 85 
 
85 
!if $save!=$empty
 86 
!if $save!=$empty
86 
  !if $source!=$empty
 87 
  !if $source!=$empty
87 
    source=!char 1 to 1000 of $source
 88 
    source=!char 1 to 1000 of $source
88 
    !set DEBUG_MODULE=!defof DEBUG_MODULE in wimshome/public_html/bases/sys/define.conf
 - 
 
89 
    listaddr=$wims_email,$local_email,$DEBUG_MODULE
 89 
    listaddr=$wims_email,$local_email,$DEBUG_MODULE
90 
    listaddr=!nonempty item $listaddr
 90 
    listaddr=!nonempty item $listaddr
91 
    listaddr=!listuniq $listaddr
 91 
    listaddr=!listuniq $listaddr
92 
    listaddr=!items2words $listaddr
 92 
    listaddr=!items2words $listaddr
93 
    vardata=!replace internal $\
 93 
    vardata=!replace internal $\