Rev 18336 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
14431 | bpr | 1 | !if $wims_read_parm!=$empty |
2 | !set parms=$wims_read_parm |
||
3 | !else |
||
4 | !if $parms=$empty |
||
5 | !exit |
||
6 | !endif |
||
7 | !endif |
||
15032 | bpr | 8 | !set option=!item 2 of $parms |
9 | !set optrecord=!getopt content in $option |
||
10 | !set optrecord=!declosing $optrecord |
||
11 | !set parms=!item 1 of $parms |
||
18336 | bpr | 12 | !set datadir=data/glossary |
13 | !set data=$datadir/$parms |
||
15032 | bpr | 14 | |
15 | !if $optrecord=abstract |
||
16 | !set optrecord=1 |
||
17 | !else |
||
18 | !if $optrecord=$empty |
||
19 | !set recordcnt=!recordcnt $data |
||
18336 | bpr | 20 | !set optrecord=!values x for x=4 to $[$recordcnt] |
15032 | bpr | 21 | !else |
18334 | bpr | 22 | !set optrecord=!values (x-1)+4 for x in $optrecord |
15032 | bpr | 23 | !endif |
24 | !endif |
||
14431 | bpr | 25 | !set gl_title=!getdef gl_title in $data |
26 | !set gl_keywords=!getdef gl_keywords in $data |
||
27 | !set gl_author=!getdef gl_author in $data |
||
28 | !set gl_type=!getdef gl_type in $data |
||
29 | !set tmp=!replace internal / by , in $data |
||
30 | !default gl_title=!lookup $(tmp[-1]) in bases/sys/domain/domain.$(tmp[-2]) |
||
31 | <div class="wims_glossary"> |
||
32 | !if $gl_type!=dynamic |
||
15032 | bpr | 33 | !for j in $optrecord |
18337 | bpr | 34 | !if $[$j%2]=0 |
15032 | bpr | 35 | !record $j of $data |
18336 | bpr | 36 | !else |
37 | !set tmp=!record $j of $data |
||
38 | !read $datadir/$tmp |
||
15032 | bpr | 39 | !endif |
40 | !next |
||
14431 | bpr | 41 | !else |
42 | !read $data |
||
43 | !endif |
||
44 | </div> |