Subversion Repositories wimsdev

Rev

Rev 13631 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 13631 Rev 15382
Line 5... Line 5...
5 
Sout=
 5 
Sout=
6 
!if $search_level!=$empty
 6 
!if $search_level!=$empty
7 
  Soutlevel=
 7 
  Soutlevel=
8 
  slcnt=!itemcnt $search_level
 8 
  slcnt=!itemcnt $search_level
9 
  !for s_ = 1 to $slcnt
 9 
  !for s_ = 1 to $slcnt
10 
      sout_=!lookup $(search_level[$s_]) in wimshome/public_html/$dictionary
 10 
    sout_=!lookup $(search_level[$s_]) in wimshome/public_html/$dictionary
11 
      sout_=!words2items $sout_
 11 
    sout_=!words2items $sout_
12 
      Soutlevel=!append item $sout_ to $Soutlevel
 12 
    Soutlevel=!append item $sout_ to $Soutlevel
13 
  !next
 13 
  !next
14 
  Soutlevel=!listuniq $Soutlevel
 14 
  Soutlevel=!listuniq $Soutlevel
15 
!endif
 15 
!endif
16 
!if $search_and=yes
 16 
!if $search_and=yes
17 
  srch1=!replace internal ,$ $ by , in $srch
 17 
  srch1=!replace internal ,$ $ by , in $srch