Subversion Repositories wimsdev

Rev

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

Rev 7704 Rev 13915
Line 1... Line 1...
1 
!set test_radio=$wims_read_parm
 1 
!set test_radio=$wims_read_parm
2 
 
 2 
 
3 
  !set dir=wimshome/public_html/bases/sys/domain/domain
 3 
!set dir=wimshome/public_html/bases/sys/domain/domain
4 
  !set dom=!lookup domain in wimshome/public_html/bases/sys/domain/domain
 4 
!set dom=!lookup domain in wimshome/public_html/bases/sys/domain/domain
5 
!if $test_radio=radio
 5 
!if $test_radio=radio
6 
 !set radio=!nosubst <input type="radio" name="taxon_keywords" id="$tid" value="$tid"/>
 6 
  !set radio=!nosubst <input type="radio" name="taxon_keywords" id="$tid" value="$tid"/>
7 
!else
 7 
!else
8 
  !reset radio
 8 
  !reset radio
9 
!endif
 9 
!endif
10 
<ul class="tree">
 10 
<ul class="tree">
11 
  !for a in $dom
 11 
  !for a in $dom
12 
  <li class="closed">
 12 
    <li class="closed">
13 
    !set t_dom=!lookup $a in $dir
 13 
    !set t_dom=!lookup $a in $dir
14 
!set tid=$(a)
 14 
    !set tid=$(a)
15 
       $radio
 15 
    $radio
16 
    !lookup $a in $dir.$lang
 16 
    !lookup $a in $dir.$lang
17 
    ($a)
 17 
    ($a)
18 
    <ul>
 18 
    <ul>
19 
       !for t in $t_dom
 19 
    !for t in $t_dom
20 
       <li class="closed">
 20 
      <li class="closed">
21 
!set tid=$(t)
 21 
      !set tid=$(t)
22 
       $radio
 22 
      $radio
23 
        !lookup $t in $dir.$lang
 23 
      !lookup $t in $dir.$lang
24 
$ ($t)
 24 
$ ($t)
25 
        !set t2=!lookup $t in $dir
 25 
      !set t2=!lookup $t in $dir
26 
        !if $t2!=$empty
 26 
      !if $t2!=$empty
27 
          <ul>
 27 
        <ul>
28 
          !for t3 in $t2
 28 
        !for t3 in $t2
29 
           <li class="closed">
 29 
          <li class="closed">
30 
!set tid=$(t3)
 30 
          !set tid=$(t3)
31 
       $radio
 31 
          $radio
32 
           !lookup $t3 in $dir.$lang
 32 
          !lookup $t3 in $dir.$lang
33 
$ ($t3)
 33 
$ ($t3)
34 
           !set t4=!lookup $t3 in $dir
 34 
          !set t4=!lookup $t3 in $dir
35 
           !if $t4!=$empty
 35 
          !if $t4!=$empty
36 
            <ul>
 36 
            <ul>
37 
            !for t5 in $t4
 37 
            !for t5 in $t4
38 
              <li class="closed">
 38 
              <li class="closed">
39 
!set tid=$(t5)
 39 
              !set tid=$(t5)
40 
       $radio
 40 
              $radio
41 
                !lookup $t5 in $dir.$lang
 41 
              !lookup $t5 in $dir.$lang
42 
$ ($t5)
 42 
$ ($t5)
43 
               !set t6=!lookup $t5 in $dir
 43 
            !set t6=!lookup $t5 in $dir
44 
               !if $t6!=empty
 44 
            !if $t6!=empty
45 
                 <ul>
 45 
              <ul>
46 
                 !for t7 in $t6
 46 
              !for t7 in $t6
47 
                   <li class="closed">
 47 
                <li class="closed">
48 
!set tid=$(t7)
 48 
                !set tid=$(t7)
49 
       $radio
 49 
                $radio
50 
                  !lookup $t7 in $dir.$lang
 50 
                !lookup $t7 in $dir.$lang
51 
$ ($t7)
 51 
$ ($t7)
52 
                  !set t8=!lookup $t7 in $dir
 52 
                !set t8=!lookup $t7 in $dir
53 
                  !if $t8!=empty
 53 
                !if $t8!=empty
54 
                     <ul>
 54 
                  <ul>
55 
                      !for t9 in $t8
 55 
                  !for t9 in $t8
56 
                     <li class="closed">
 56 
                    <li class="closed">
57 
!set tid=$(t9)
 57 
                    !set tid=$(t9)
58 
       $radio
 58 
                    $radio
59 
                   !lookup $t9 in $dir.$lang
 59 
                    !lookup $t9 in $dir.$lang
60 
$ ($t9)
 60 
$ ($t9)
61 
                     </li>
 61 
                    </li>
62 
                     !next
 62 
                    !next
63 
                     </ul>
 63 
                    </ul>
64 
                   !endif
 64 
                  !endif
65 
                   </li>
 65 
                  </li>
66 
                 !next
 66 
                !next
67 
                 </ul>
 67 
                </ul>
68 
               !endif
 68 
              !endif
69 
              </li>
 69 
              </li>
70 
            !next
 70 
            !next
71 
           </ul>
 71 
            </ul>
72 
           !endif
 72 
          !endif
73 
         </li>
 73 
          </li>
74 
          !next
 74 
        !next
75 
          </ul>
 75 
        </ul>
76 
        !endif
 76 
      !endif
77 
        </li>
 77 
      </li>
78 
     !next
 78 
    !next
79 
     </ul>
 79 
    </ul>
80 
    !endif
 80 
  !endif
81 
    </li>
 81 
  </li>
82 
  !next
 82 
!next
83 
 </ul>
 83 
 </ul>
84 
 !exit
 84 
 !exit
85 
 <pre>
 85 
 <pre>
86 
 !record 0 of wimshome/public_html/bases/sys/domain/domain.$modu_lang
 86 
 !record 0 of wimshome/public_html/bases/sys/domain/domain.$modu_lang
87 
 </pre>
 87 
 </pre>