Subversion Repositories wimsdev

Rev

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

Rev 8817 Rev 9436
Line 30... Line 30...
30 
 !if $lang iswordof $test_transl
 30 
 !if $lang iswordof $test_transl
31 
   tr_lang=yes
 31 
   tr_lang=yes
32 
   title=!module title_$lang $dir
 32 
   title=!module title_$lang $dir
33 
   desc=!module description_$lang $dir
 33 
   desc=!module description_$lang $dir
34 
 !endif
 34 
 !endif
- 
 
 35 
 !read getparm $iniparm exo
- 
 
 36 
 desc=!lookup $get_exo in wimshome/public_html/modules/$dir/Descindex
- 
 
 37 
 obs=!lookup $get_exo in wimshome/public_html/modules/$dir/Obsindex
35 
 !default title=!module title $dir
 38 
 !default title=!module title $dir
36 
 !default desc=!module description $dir
 39 
 !default desc=!module description $dir
37 
 cat=!module category $dir
 40 
 cat=!module category $dir
38 
 !if exercise notin $cat and oef notin $cat
 41 
 !if exercise notin $cat and oef notin $cat
39 
  error=not_exo
 42 
  error=not_exo
Line 68... Line 71...
68 
  error=too_many_exos
 71 
  error=too_many_exos
69 
  !exit
 72 
  !exit
70 
 !endif
 73 
 !endif
71 
 idesc=!singlespace $new_desc
 74 
 idesc=!singlespace $new_desc
72 
 idesc=!char 1 to $desc_limit of $idesc
 75 
 idesc=!char 1 to $desc_limit of $idesc
- 
 
 76 
 iobs=!singlespace $obs
- 
 
 77 
 iobs=!char 1 to $desc_limit of $iobs
73 
 ititle=!singlespace $title
 78 
 ititle=!singlespace $title
74 
 ititle=!char 1 to $title_limit of $ititle
 79 
 ititle=!char 1 to $title_limit of $ititle
75 
 !if $scoring=yes
 80 
 !if $scoring=yes
76 
  require=$[$require]
 81 
  require=$[$require]
77 
  weight=$[$weight]
 82 
  weight=$[$weight]
Line 122... Line 127...
122 
 !appendfile wimshome/log/classes/$wims_class/sheets/.sheet$picksheet :$dir\
 127 
 !appendfile wimshome/log/classes/$wims_class/sheets/.sheet$picksheet :$dir\
123 
$iniparm\
 128 
$iniparm\
124 
$require\
 129 
$require\
125 
$weight\
 130 
$weight\
126 
$ititle\
 131 
$ititle\
127 
$idesc
 132 
$idesc\
- 
 
 133 
\
- 
 
 134 
$iobs
128 
 
 135 
 
129 
 exocnt=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheet$picksheet
 136 
 exocnt=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheet$picksheet
130 
 wims_module_log=class $class: add No$exocnt to worksheet $picksheet
 137 
 wims_module_log=class $class: add No$exocnt to worksheet $picksheet
131 
!endif
 138 
!endif