Subversion Repositories wimsdev

Rev

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

Rev 11483 Rev 14896
Line 17... Line 17...
17
 
17
 
18
module_P=wimshome/public_html/modules/tool/popup
18
module_P=wimshome/public_html/modules/tool/popup
19
wims_trustfile=$module_P.$search_lang/search.phtml $module_P.$search_lang/search.proc
19
wims_trustfile=$module_P.$search_lang/search.phtml $module_P.$search_lang/search.proc
20
test=!record 0 of $module_P.$search_lang/.test
20
test=!record 0 of $module_P.$search_lang/.test
21
!if yes notin $test
21
!if yes notin $test
-
 
22
  test=!record 0 of $module_P.fr/.test
-
 
23
  !if yes notin $test
22
 slist=!translate P to $ $ in $slist
24
    slist=!translate P to $ $ in $slist
-
 
25
  !else
-
 
26
    p_lang=en
-
 
27
  !endif
-
 
28
!else
-
 
29
  p_lang=$search_lang
23
!endif
30
!endif
24
cnt=!record 0 of wimshome/public_html/bases/sheet/index/count.$search_lang
31
cnt=!record 0 of wimshome/public_html/bases/sheet/index/count.$search_lang
25
!if $cnt<=0
32
!if $cnt<=0
26
 slist=!translate S to $ $ in $slist
33
  slist=!translate S to $ $ in $slist
27
!endif
34
!endif
28
slist=!words2items $slist
35
slist=!words2items $slist
29
plist=
36
plist=
30
!for i in $slist
37
!for i in $slist
31
 plist=!append item $(C_$i) to $plist
38
  plist=!append item $(C_$i) to $plist
32
!next i
39
!next i