Subversion Repositories wimsdev

Compare Revisions

Ignore whitespace Rev 7679 → Rev 12821

/trunk/wims/public_html/modules/home/search.C
1,12 → 1,12
!!##class
basedir=bases/class
!if $srch!=$empty
suffix_dictionary=
dictionary=$basedir/$search_lang
translator_unknown=
!read search.common
suffix_dictionary=
dictionary=$basedir/$search_lang
translator_unknown=
!read search.common
!else
scnt=0
scnt=0
!endif
# Limit of shown items
gotlim=1000
13,30 → 13,30
!distribute item 0,0,, into weight,gotcnt,gotm,gotw,lastmod
 
!for i=1 to $scnt
l_=!line $i of $sout
t_=!wordcnt $l_
!advance gotcnt
!if $t_=2
!distribute word $l_ into m_,w_
!if $m_=$lastmod or $gotcnt>$gotlim
weight=$[$weight+$w_]
l_=!line $i of $sout
t_=!wordcnt $l_
!advance gotcnt
!if $t_=2
!distribute word $l_ into m_,w_
!if $m_=$lastmod or $gotcnt>$gotlim
weight=$[$weight+$w_]
!else
!if $lastmod!=$empty
gotm=$gotm $lastmod
gotw=$gotw $weight
!advance gotcnt
!endif
lastmod=$m_
weight=$w_
!endif
!else
!if $lastmod!=$empty
gotm=$gotm $lastmod
gotw=$gotw $weight
!advance gotcnt
!endif
lastmod=$m_
weight=$w_
gotm=$gotm $l_
!endif
!else
gotm=$gotm $l_
!endif
!next i
!if $lastmod!=$empty
gotm=$gotm $lastmod
gotw=$gotw $weight
!advance gotcnt
gotm=$gotm $lastmod
gotw=$gotw $weight
!advance gotcnt
!endif
 
gotm=!words2lines $gotm
52,6 → 52,6
gotiC=!exec translator $gotm
 
!if $gotcnt>0 and / notin $gotm
dictionary=$basedir/addr
gotm=!exec translator $gotm
dictionary=$basedir/addr
gotm=!exec translator $gotm
!endif