Rev 12594 | Go to most recent revision | Details | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
12569 | bpr | 1 | # Variable calculations should be done in this file. |
2 | # It is read and interpreted by wims for all valid calls to the module. |
||
3 | |||
4 | !read adm/class/classlang names.phtml |
||
5 | !read tabletheme |
||
6 | |||
7 | class=$wims_class |
||
8 | !if $wims_user!=supervisor |
||
9 | error=not_supervisor |
||
10 | !exit |
||
11 | !endif |
||
12 | glossarytot=!recordcnt wimshome/log/classes/$wims_class/tool/.glossaryindex |
||
13 | !read getparm $module_init_parm iniparm gl |
||
14 | !set iniparm=$get_iniparm |
||
15 | !set gl_title=!getdef gl_title in $data_dir/$iniparm |
||
16 | !default gl=$get_gl |
||
17 | |||
18 | !bound job within add,mod,chstatus default mod |
||
19 | !!if $job=mod and $cmd=reply |
||
20 | |||
21 | !set wims_ariane=!append line Glossary,1,module=adm/tool/glossary\ |
||
22 | to $wims_ariane |
||
23 | !if $gl>0 |
||
24 | !set wims_ariane=!append line Glossary $gl,1,module=adm/tool/glossary&gl=$gl\ |
||
25 | to $wims_ariane |
||
26 | !endif |
||
27 | |||
28 | !!endif |
||
29 | |||
30 | !set wims_ariane_self=no |
||
31 | |||
32 | !changeto $job.proc |